#!/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~"; Jewell and Anastasia in Reflective Passion
fetish sluts Satine Phoenix and lesbian whore Attena fatale in BDSM movie with Tiger Lily

Jewell and Anastasia in Reflective Passion
Jewell and Anastasia in Reflective Passion Movie1 Jewell and Anastasia in Reflective Passion Movie 2 Jewell and Anastasia in Reflective Passion sample movie3
Visit XXX Horror today and see more ANASTASIA PIERCE!
100's of the hottest PORN STARS doing your WILDEST FANTASIES - Over 400,000 exclusive Fetish Movies, Horror Sex Images, Vampire Comics, SCI-FI Porn Videos, Alien Manga and Bondage Pictures.
JewellAnastasiaReflectivePassion1_001 JewellAnastasiaReflectivePassion1_013 JewellAnastasiaReflectivePassion1_025 JewellAnastasiaReflectivePassion1_043 JewellAnastasiaReflectivePassion1_046
JewellAnastasiaReflectivePassion1_049 JewellAnastasiaReflectivePassion1_064 JewellAnastasiaReflectivePassion1_074 JewellAnastasiaReflectivePassion1_095 JewellAnastasiaReflectivePassion1_098
JewellAnastasiaReflectivePassion1_102 JewellAnastasiaReflectivePassion1_106 JewellAnastasiaReflectivePassion1_123 JewellAnastasiaReflectivePassion1_127 JewellAnastasiaReflectivePassion1_130
BDSM movies and fetish porn stars

webmasters
2257 porn statement ~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 } }