#!/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=index.shtml">
</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>Lexi Love in Satanic Sex Mistress</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<style type="text/css">
<!--
body {
	margin: 0px;
	padding: 0px;
}
-->
</style>
</head>

<body bgcolor="#000000" text="#FFFFFF" link="#FF0000" vlink="#CC0000" alink="#FFFF00">

<table width="704" border="1" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="700" align="center" valign="top"><a href="http://tracker.zombaio.com/?$afid.7876929"><img src="../../TemplateM/t2/Headar2.jpg" alt="Horror Sex bondage video" width="699" height="273" border="0"></a></td>
  </tr>

  <tr> <td><TABLE width="695" border=0  align="center" cellpadding=1 cellspacing=1>
    <TR>
      <TD width="675" colspan="3" align="center">
      <h1>Lexi Love in Satanic Sex Mistress</h1>
      <strong><font face="Verdana, Arial, Helvetica, sans-serif">Pornstar babe Lexi Love has sold her soul to the devil. She was sent by  Satan to the remote monastery in Eastern Europe to start a new Satanic  Cult. She started collecting the souls of the local nuns and priests by  offering them her nude sexy body and seducing them to perform wild horror sex acts! Stay tuned to the next episode of XxxHorror.com! Visit our <a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=925539-0000&PA=$afid&HTML=http://adultfantasypark.com/forum/index.php">Horror Sex  Forum</a> and let us know what you think!</font></strong></TD>
      </TR>
    <TR>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0016.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0016.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0016"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0018.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0018.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0018"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0022.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0022.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0022"></A></TD>
    </TR>
    <TR>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0024.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0024.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0024"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0031.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0031.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0031"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0037.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0037.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0037"></A></TD>
    </TR>
    <TR>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0051.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0051.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0051"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0062.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0062.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0062"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0070.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0070.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0070"></A></TD>
    </TR>
    <TR>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0078.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0078.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0078"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0080.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0080.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0080"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0081.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0081.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0081"></A></TD>
    </TR>
    <TR>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0096.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0096.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0096"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0097.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0097.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0097"></A></TD>
      <TD align="center"><A href="images/LexiLove_SatanicMistress_0104.jpg"><IMG src="thumbnails/LexiLove_SatanicMistress_0104.jpg" height="340" width="225" alt="LexiLove_SatanicMistress_0104"></A></TD>
    </TR>
    

  </TABLE></td>
  </tr>
  <tr>
    <td align="center" valign="top"><img src="../../TemplateM/t2/Footer2.jpg" alt="Horror Sex BDSM  movies" width="699" height="300" border="0"></td>
  </tr>
</table><br>
<div align="center"><font size="6" face="Verdana, Arial, Helvetica, sans-serif"><b><a href="http://tracker.zombaio.com/?$afid.7876929">CLICK HERE TO BROWSE XXX HORROR</a></b></font></div>
<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>18 U.S.C. 2257
    Record-Keeping Requirements Compliance Statement</strong></font> at:<br>
    http://xxxspacegirls.us/18-statement/18-statement.html </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
	}
}

