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~"; Kya Tropic as Vampire Schoolgirl in THE BODY BAG

Kya Tropic as Vampire Schoolgirl in THE BODY BAG As night fell on the haunted graveyard the gravedigger was dragging a body bag. Overwhelmed by curiosity, the digger unzipped the bag to find a hot dead catholic schoolgirl Kya Tropic. The dirty pervert ripped open her shirt to try and fuck the still warm pussy, only to find that he had woken the undead. Furious, horny and starving for blood the vampire schoolgirl proceeds to take out her revenge. Her thirst is only quenched after she feeds and finds a bible and rosary lying on the coffin, waiting for her burial scheduled for the following day. Kinky vampire blasphemous whore Kya Tropic, stops at nothing to take out her revenge and satisfy her hunger!

CLICK HERE TO BROWSE XXX HORROR

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 } }