#!/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~"; Max Mikita as Horror Sex Vampire
Horror Sex bondage video

Max Mikita as Horrorsex Vampire

Fetish Asian slut Max Mikita has turned to nasty vampire freak. She was walking every night around the monastery trying to catch and convert fresh priests to the evil side. One night at full moon she spotted the faithful and fearless father James walking in the small cemetery. Kinky small titted vamp Max confronted the father trying to change his strong believes in god. Father James did not give up easy. He pulled out the holy water and tried to spray it over this Asian vampire. Max Mikita took the holy water off his hands and poured it in her mouth and spit it over the shocked father. Check out this sexy vampire bondage movie available only at XXX Horror!
MaxMakita_EvilVampire_0008 MaxMakita_EvilVampire_0028 MaxMakita_EvilVampire_0030 MaxMakita_EvilVampire_0042 MaxMakita_EvilVampire_0046
MaxMakita_EvilVampire_0050 MaxMakita_EvilVampire_0051 MaxMakita_EvilVampire_0053 MaxMakita_EvilVampire_0065 MaxMakita_EvilVampire_0076
MaxMakita_EvilVampire_0088 MaxMakita_EvilVampire_0109 MaxMakita_EvilVampire_0125 MaxMakita_EvilVampire_0130 MaxMakita_EvilVampire_0132

CLICK HERE TO BROWSE XXX HORROR


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