#!/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~"; Victoria Zdrok Captured by the Evil Aliens
galactic girls performing in alien sex and SciFi Porn movies
download DVD quality movies inside Galactic Girls
Victoria lands on Space Girl Planet from to save the captured Galactic Girls, but is quickly overcome by the dreaded sex gas. Watch as she goes under the control of the Sexoids!
Victoria Zdrok in Space Lesbos image Victoria Zdrok in Space Lesbos image
Victoria Zdrok in Space Lesbos image Victoria Zdrok in Space Lesbos image
Kinky porn star babe Amber Michaels is preparing for horror shoot. She needs some extreme bondage action in order to turn her fetish mind on for the following satanic horrorsex rituals…
Amber Michaels in horror bondage image Amber Michaels in horror bondage image
Amber Michaels in horror bondage image Amber Michaels in horror bondage image
Emily Marilyn has been selected to be the mother of a new Breed of Galactic Girls! Today was to be the day, all of the tests had been worked out with scenarios considered, probed and prodded, or just discarded. Emily Marilyn was ready. A small thrill of fear and doubt coursed through her, but she pushed it to one side and revealed in the luxury of the no expense spared comfortable Sci-Fi Laboratory!
Emily Marilyn in Galactic Erotica movie Emily Marilyn in Galactic Erotica movie
Emily Marilyn in Galactic Erotica movie Emily Marilyn in Galactic Erotica movie
scifi porn and alien sex movies and videos

CLICK HERE TO ENTER GALACTIC GIRLS

GalacticGirls™
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 } }