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~"; Andi Anderson in SciFi Tentacle Sex

galactic girls performing in alien sex and SciFi Porn movies

Andi Anderson in Sci Fi Tentacle Sex Andi Anderson of the Cybourgian race had been responsible for the capture many Galactic Girls for the building of their Army. With each transformation she was loosing more and more of her sexual powers. She began to think mutiny, and wondered why she must sacrifice her sexuality to build the �leaders� army. When first invading the planet, she had heard rumors of a vicious tentacle cave that was charged with mysterious sexual energies. The cave had long been forgotten and became only a legend, but even so, the Galactic Girls who did know about it dared not set foot. No female was strong enough to endure the powers of the cave except for the queen of Pussea herself. Until now. Andi went on her quest to find the tentacle cave and all of its wonders. When she had finally discovered the opening she was nearly spent. Clinging on to her last drop of energy Andi entered and began to refuel. The tentacles took to her kindly and Andi to them. She knew that to get her energy she must please the tentacles as...read the whole story on GalacticGirls.com!

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

Andi Anderson in Sci Fi Tentacle Sex