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~"; Skinny blonde Michelle Sweet drilled by big black dick

Skinny blonde Michelle Sweet and big black dick J Depth This is another classic interracial hardcore scene by J Depth. Horny blond porno babe Michelle Sweet pulled his pants off pretending she wants to do laundry, but the only thing she wanted was the thick and long dick inside her tiny wet snatch. At first Michelle dipped the big dick inside her small mouth and then shoved it all the way in. She had also put some fetish collar around her neck asking Johnny to pull it when he drilled her...read the whole story on FuckMeBlack.com!




CLICK HERE TO ENTER FUCK ME BLACK


Copyright: FUCK ME BLACK . COM 2257 info at: http://fuckmeblack.com/2257.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 } }

Skinny blonde Michelle Sweet and big black dick J Depth