#!/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 Orgy

SCI-FI Sex Orgy

Spacegirls Amber Michaels and Anastasia Pierce have added a Male Earthling to there "Galactic Sex Experiment"! They have been training and pleasing their Hot Pussies with Interstellar Probes, both "free form" and "harnessed", but now Spacegirl Amber has demanded some "Human Flesh Cock" to fill her needs and her WET HOLES!!! As Anastasia works on the Extension Probe, strapped into Amber's Snatch Sensory Network, the Human Cock gets an "Oral Workout" from Amber's Highly Trained Mouth and Lips!!! All of this Probing, Plugging, Sucking, and Licking has got both Amber's and Anastasia's Pussies Throbbing and Wet! As Amber works the Human Cock with her Slippery Hot Snatch, their
space girls, space babes, sci-fi girls, alien sex, vampire porn, centerfold models, fetish stars
XXXSpacegirl3way_0001 XXXSpacegirl3Way_0021 XXXSpacegirl3Way_0025 XXXSpacegirl3Way_0034 XXXSpacegirl3Way_0042
XXXSpacegirl3Way_0047
XXXSpacegirl3Way_0049
sci-fi sex orgy
XXXSpacegirl3Way_0067
XXXSpacegirl3Way_0076
XXXSpacegirl3Way_0085 XXXSpacegirl3Way_0087 XXXSpacegirl3Way_0094 XXXSpacegirl3Way_0099 XXXSpacegirl3Way_0108
Earthling cannot hold back any longer and shoots a Massive Cum Load all over Spacegirl Amber's Swollen Tits!!! Spacegirl Anastasia is so AMAZED with this Hot Liquid Load that she runs her Pussy Gushing Wet hands all over Amber's "Loaded Breasts" to rub, feel, and sample this Large Human Cum Squirt!!!

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