#!/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~"; Jennifer Dark and Tory Lane in Lesbo Torture
www.handjobsalon.com

Jennifer Dark and Tory Lane in Lesbo Torture

Nasty fetish whores Jennifer Dark and Torry Lane enjoy kinky hot lesbian sex, while dominating a willing male victim.
IMG_5064 IMG_5108 IMG_5165
IMG_5169 IMG_5200 IMG_5206
IMG_5212 IMG_5242 IMG_5263
IMG_5304 IMG_5335 IMG_5356
IMG_5370 IMG_5376 IMG_5380

CLICK HERE TO BROWSE HANDJOBSALON

6TGP - The home of free porn

HANDJOBSALON ™

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