#!/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>Mia Valerio and Lystra Faith in Wild Things</TITLE>

<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</HEAD>



<BODY bgcolor="#000000" text="#FFFFFF" link="#CC0000" vlink="#990000" alink="#FF0000">

<h1 align="center">Mia Valerio and Lystra Faith in Wild Things</h1>

<div align="center"><a href="http://tracker.zombaio.com/?$afid.7876929"><img src="../../header/XXXHorror.jpg" alt="fetish lingerie, lesbian girls, porn stars, hot lingerie, panties, leather, latex, centerfold babes" width="585" height="100" border="0"></a></div>

<TABLE width="585" border=0  align="center" cellpadding=0 cellspacing=5 bgcolor="#FFFFFF">

  <TR> 

    <TD colspan="5" align="center"><font color="#000000">Top dominatrix babe <a href="http://tracker.zombaio.com/?$afid.7876969">Mia 

      Valerio</a> has brought this time her fetish lesbian girlfriend Lystra Faith. 

      Both girls enjoyed each other on our back alley set. At some point those 

      horny sluts needed some weapons in order to experience higher fetish sex 

      satisfaction during their multiple orgasms. Luckily for them we have huge 

      weapon arsenal&#8230;In Part2 you will find that those fetish sluts have 

      found a male victim of their weird sexual desires. Not quite a victim as 

      it looks like that this guy enjoyed the female domination&#8230;</font></TD>

  </TR>

  <TR> 

    <TD width="111" align="center"><A href="images/Mia-Lystra_WildThings1_0038.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings1_0038.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings1_0038 thumbnail"></A></TD>

    <TD width="111" align="center"><A href="images/Mia-Lystra_WildThings1_0146.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings1_0146.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings1_0146 thumbnail"></A></TD>

    <TD width="111" align="center"><A href="images/Mia-Lystra_WildThings1_0158.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings1_0158.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings1_0158 thumbnail"></A></TD>

    <TD width="111" align="center"><A href="images/Mia-Lystra_WildThings1_0276.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings1_0276.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings1_0276 thumbnail"></A></TD>

    <TD width="111" align="center"><A href="images/Mia-Lystra_WildThings1_0296.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings1_0296.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings1_0296 thumbnail"></A></TD>

  </TR>

  <TR> 

    <TD align="center"><A href="images/Mia-Lystra_WildThings1_0386.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings1_0386.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings1_0386 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings1_0486.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings1_0486.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings1_0486 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0001.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0001.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0001 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0034.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0034.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0034 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0066.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0066.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0066 thumbnail"></A></TD>

  </TR>

  <TR> 

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0136.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0136.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0136 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0169.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0169.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0169 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0364.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0364.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0364 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0394.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0394.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0394 thumbnail"></A></TD>

    <TD align="center"><A href="images/Mia-Lystra_WildThings2_0453.jpg"><IMG src="thumbnails/Mia-Lystra_WildThings2_0453.jpg" height="160" width="107" border="2" alt="Mia-Lystra_WildThings2_0453 thumbnail"></A></TD>

  </TR>

</TABLE>

<br>

<div align="center"> <a href="http://tracker.zombaio.com/?$afid.7876929" class="blink"><font size="5" face="Verdana, Arial, Helvetica, sans-serif"><strong>CLICK 

  HERE TO BROWSE XXX HORROR</strong></font></a> </div>

<br>



<div align="center">

<font face="Verdana, Arial, Helvetica, sans-serif"><strong><font size="2">xxxFetishWorld&#8482;<br>

    <font face="Verdana, Arial, Helvetica, sans-serif"><strong>18 U.S.C. 2257 

    Record-Keeping Requirements Compliance Statement:<br>

    http://xxxspacegirls.us/18-statement/18-statement.html </strong></font></font></strong></font>

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

	}

}



