Generator error

#!/usr/bin/perl -T ###################### #��author:glisten # http://www.dsl-speed.org ###################### &get_form_data; &emptyid unless $FORM{'sid'}; $afid=$FORM{'sid'}; &gencode; sub emptyid{ $login_page="http://www.adultworldmedia.com"; # Replace to your affiliate program url print "Content-Type: text/html\n\n"; print <<"~EOT~"; Generator error Please input Your affiliate ID Try again. ~EOT~ exit; } sub gencode{ print "Content-Type: text/html\n\n"; print <<"~EOT~"; Michelle maylene and samantha Sterlyng Horrorsex Lesbians

Michelle Maylene Vampire Maiden
Devil Girl Michelle Maylene is a SEX CHARGED PORN BABE by day and a DEMONIC SEX PREDATOR by night! Michelle was initiated into the DARK ARTS as she loves SEX and the NIGHT! Unknowingly, Michelle Maylene had fallen victim to a SATANIC CULT that wandered the lonely deserts of California, leading her into these DARK SEXUAL PRACTICES! She has now entered the HORROR LAIR where anything is possible!



Samantha Sterlyng in Horror Dungeon
Samantha found a willing victim to satisfy her taste and sexual desires�

xxxHorror™
18 U.S.C. 2257 Record-Keeping Requirements Compliance Statement at:
http://xxxspacegirls.us/18-statement/18-statement.html

~EOT~ exit; } # Get form data sub get_form_data { read(STDIN,$buffer,$ENV{'CONTENT_LENGTH'}); if ($ENV{'QUERY_STRING'}) { $buffer = "$buffer\&$ENV{'QUERY_STRING'}" } @pairs = split(/&/,$buffer); foreach $pair (@pairs) { ($name,$value) = split(/=/,$pair); $value =~ tr/+/ /; $value =~ s/\t//g; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; $FORM{$name} = $value } }

Michelle Maylene Vampire Maiden

Samantha Sterlyng in Horror Dungeon