Generator error

#!/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~"; SciFi girls Stephanie and Dakota in Cybourg Lesbian BDSM

galactic girls performing in alien sex and SciFi Porn movies

SciFi girls Stephanie and Dakota in Cybourg Lesbian BDSM Galactic girl Dakota Rose was captured by the torturous fiend Stephanie Sage for Cybourg experimentation. To continue their breeding plan, Stephanie must nourish the "Master" alien baby. She attached Dakoa to the fluid DNA extraction device to feed the machine. Dakots struggles for her life, but being put under the control of the Cybourgian baby, she begins to enjoy the strange devices attached all over her naked body. Dakota knows that...Read the whole story on GalacticGirls.com!

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://tracker.zombaio.com/?$afid.7876960

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