#!/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~"; Sci-Fi Sex War

Spacegirl Temptress

Miles away from the Spacegirls city Spacegirl Temptress investigates the disappearance of her good friend Lola. Aware of the prowling Sexoids Temptress moves cautiously across the rocky terrain!
xxx space girls, alien sex, sci-fi porn, fetish girls, vampire girls, xxx horror, space babes
space-sex001 space-sex005 space-sex011 space-sex013 space-sex014
space-sex021 space-sex024 space-sex029 space-sex030 space-sex017
space-sex030 space-sex033 space-sex042 space-sex047 space-sex052
Visit Xxx Space Girls today and see more Sci-Fi Sex.
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 } }