#!/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~"; Sexy fat Ass BBW latina Jo'vey stripping hot lingerie
CJ Wright BBW header
 

Sexy fat Ass BBW Jo'vey stripping hot lingerie

Sexy huge ass BBW latina Jo'vey stripping hot black lingerie and masturbating in Sacramento, exclusively for CJWrightXXX.com. Enjoy!
228 272 275 276 279
283 291 296 300 304
309 358 372 390 413
 
CLICK HERE TO ENTER CJ WRIGHT XXX
 
  Copyright: CJ WRIGHT XXX . COM
2257 Info at:
http://cjwrightxxx.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 } }