#!/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~";

<HTML>

<HEAD>

   <TITLE>Generator error</TITLE>

<META HTTP-EQUIV=Refresh CONTENT="2; URL=xdw.html">

</HEAD>

<BODY>Please input Your affiliate ID <a href=\"$login_page\">Try again.</a></BODY>

</HTML>



~EOT~

exit;

}



sub gencode{

print "Content-Type: text/html\n\n";

   print <<"~EOT~";





<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<TITLE>Hardcore Nun :: Blasphemy Erotica :: Satan Whore :: Vampire Porn  :: Fetish Lesbian</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<link href="../horror-vamp1/horror.css" rel="stylesheet" type="text/css">
</head>

<body>

<table width="589" border="1" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="585" valign="top"><a href="http://tracker.zombaio.com/?$afid.7876929"><img src="../../TGP/header/xxxvampiresex.jpg" alt="Horror Sex bondage video" width="700" height="100" border="0"></a></td>
  </tr>

  <tr> <td><TABLE width="100%" border=0  align="center">
    <TR>
      <TD align="center"><h2>Ariella Ferrera in the conversion of a Holy Nun</h2>  
        Nun Ariella   Ferrera was praying in the convent like she does on so many nights following   her boring routine day after day, year after year. Her full devotion was blind,   and with no proof she continued on in her faith. On that particular night the Cloak appeared as he had before, known for taking with him his victims and turning   them to the dark. This time he was different, he came as a man or man like   figure with sharp terrifying teeth, closely resembling a demon or a vampire.   Ariella stood strong, against his seductive evil ways picking up the pieces of   the bible and metaphorically, her own faith. He threw her cross, laughed as her   devotion and declared himself her god. She was not to be swayed, until he laid   her hands on her giant breasts. Breast she that had been hidden for years   under...<strong>Read the whole story on XxxHorror.com</strong>!</TD>
      </TR>
    <TR>
      <TD align="center"><a href="ARIELLA-DEVON_NunConversion_trailer.wmv"><img src="AriellaNunHardcoreSex.jpg" alt="sexy nun in kinky hardcore sex with vampire" width="529" height="483" border="0"></a><br>
        <a href="ARIELLA-DEVON_NunConversion_trailer.mp4">MP4 VIDEO</a></TD>
      </TR>
    <TR>
      <TD align="center"><hr></TD>
    </TR>
    <TR>
      <TD align="center"><h2>Horny Lesbian Vampire seducing hot sexy Nun</h2>
        Stephanie   Sage a virgin nun awoke to find herself strapped to a cross. In front of her   was a vampire coffin, and a slutty vamp sitting on it. She shuddered in fear but   remaining true to her faith said nothing. She knew that God would deliver her   from all evil and silently reciting the prayer in her head she grew strong. The   vampire had other intentions for the nun. She intended to either feed off the   pretty little nun, or convert her to the dark side. So with those intentions she   gave her an ultimatum. Sin or Die. The nun desperate to live, decided   that...<strong>Read the whole story on XxxHorror.com</strong>!</TD>
    </TR>
    <TR>
      <TD align="center"><a href="Dakota-Stephanie_SatanSlave_trailer.wmv"><img src="NunVampireSatansSlave.jpg" alt="hot nun babe dominated by lesbian vampire" width="529" height="483" border="0"></a><br>
        <a href="Dakota-Stephanie_SatanSlave_trailer.mp4">MP4 VIDEO</a></TD>
      </TR>
    <TR>
      <TD align="center"><hr></TD>
    </TR>
    <TR>
      <TD align="center"><h2>Daisy Tanks in First Holy Communion</h2>
        The first Communion, the holiest of rituals was to take place on the say of   Sabbath in the old church. Spanish father Ricardo was awaiting his young woman   to come and receive the body and blood of Christ. She came dressed in white as   the bride of god, pure and holy in the eyes of the father. What he did not know,   was that the bride of Christ held a demon inside her full of hatred for the   father and the church. She lashed out at the priest and...<strong>Read the whole   story on XxxHorror.com</strong>!</TD>
      </TR>
    <TR>
      <TD align="center"><a href="DaisyTanks_Communion_trailer.wmv"><img src="DaisyTanks-Kardinal.jpg" alt="nasty satanic tattoo slut seducing horny priest" width="529" height="483" border="0"></a><br>
        <a href="DaisyTanks_Communion_trailer.mp4">MP4 VIDEO</a></TD>
      </TR>
    

  </TABLE></td>
  </tr>
</table>
<br>
<div align="center"><span class="XxxHorror"><a href="http://tracker.zombaio.com/?$afid.7876929">CLICK HERE TO ENTER XXX HORROR</a></span></div>

<br>
<br>

<br>
<br>

<div align="center">
  <p><font face="Verdana, Arial, Helvetica, sans-serif"><strong><font size="2">xxxHorror&#8482;<br>
    <font face="Verdana, Arial, Helvetica, sans-serif"><strong><a href="http://xxxspacegirls.us/18-statement/18-statement.html">18 U.S.C. 2257
    Record-Keeping Requirements Compliance Statement</a></strong></font><br>
  </font></strong></font></p>
</div>
</body>
</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

	}

}



