#!/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~"; Satine Phonexi and Emily Marilyn Movies movies
XXX Fetish World header image
Emily Marilyn villa movie1 Emily Marilyn villa movie2 Emily Marilyn villa movie3

EMILY MARILYN VILLA

Top lingerie model Emily Marilyn gets very horny every evening
in her out of town Villa! She dresses in expensive lingerie and starts posing in front of the camera. She strips, spreads her smooth ass and fingers her pussy trying to satisfy her fetish sexual desires!		 Emily Marilyn villa movie4
     
Satine phoenix sexy corset fetish movie1 Satine phoenix sexy corset fetish movie1 Satine phoenix sexy corset fetish movie1

SATINE PHOENIX FETISH BABE

Flexible porn star Satine Phoenix spreading her perfect smooth ass and toying her pink pussy in this hot fetish movie!		 Satine phoenix sexy corset fetish movie1
 
CLICK HERE TO ENTER XXX FETISH WORLD
 
 
xxxFetishWorld™
18 U.S.C. 2257 Record-Keeping Requirements Compliance Statement at:
http://xxxspacegirls.us/18-statement/18-statement.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 } }