#!/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~"; Taimie Hannum in Switch Blade

Taimie Hannum in Switch Blade

porn stars performing horror sex and vampire bondage
taimieknife002 taimieknife006 taimieknife013 taimieknife016 taimieknife020
taimieknife026 taimieknife039 taimieknife041 taimieknife044 taimieknife046
taimieknife051 taimieknife052 taimieknife053 taimieknife070 taimieknife086
Visit Xxx Space Girls today and see more Taimie Hannum.
100's of the hottest porn stars doing your wildest fantasies. Over 400,000 exclusive FETISH MOVIES, HORROR SEX IMAGES, VAMPIRE BONDAGE , SCI-FI GIRLS and ALIEN PORN.

webmasters

XXXSPACEGIRLS™

~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 } }