#!/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~"; Big Cock Anal Interracial Group Sex Movies
interracial group anal sex

Big Cock Anal Interracial Group Sex Movies

Sexy hot ass MILFs and first time mature babes drilled deep in the ass by huge black dicks in interracial anal porn movies. Check out more interracial anal group sex movies at CJwrightXXXanal.com!
anal interracial group sex
MILF Group Sex Video		 first time anal interracial group sex
First Time Anal Sex Video		 big cock anal interracial sex
Big Black Cock Anal Sex
 
CLICK HERE TO ENTER CJ WRIGHT XXX ANAL
 
 
Copyright: CJ WRIGHT XXX ANAL . COM
18 U.S.C. 2257 Record-Keeping Requirements Compliance Statement at:
http://cjwrightxxxanal.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 } }