#!/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~"; Frustrated Wife Sasha Sky drilled by big black dick
free interracial movies

Frustrated Wife Sasha Sky drilled by big black dick

Dear Diary, Oh, my goodness, you are the only one I can tell! I was so frustrated with my husband traveling all the time, that I did some traveling too, and brought this tall black man back to my home! I took his pants off and I found the biggest...read the whole story on FuckMeBlack.com!
IMG_6623 IMG_6661 IMG_6667 IMG_6704 IMG_6718
IMG_6727 IMG_6730 IMG_6787 IMG_6860 IMG_6887
IMG_6921 IMG_6930 IMG_6940 IMG_6941 IMG_6946
         
CLICK HERE TO ENTER FUCK ME BLACK
         
         
2257 Info URL 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 } }