#!/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>Michelle Maylene POV Fingering</TITLE>



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

</HEAD>



<BODY bgcolor="#FFFFCC" text="#000000" link="#CC0000" vlink="#660000" alink="#FF0000">



<h1 align="center">Michelle Maylene POV Fingering</h1>

<div align="center"><a href="http://tracker.zombaio.com/?$afid.7876969"><img src="../../header/bcfolds-jjcahill.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="#E9250D">



<TR>

		<TD width="111" align="center"><A href="images/MichelleMaylene_theReachIn_0001.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0001.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0001"></A></TD>

	<TD width="111" align="center"><A href="images/MichelleMaylene_theReachIn_0024.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0024.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0024"></A></TD>

	<TD width="111" align="center"><A href="images/MichelleMaylene_theReachIn_0032.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0032.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0032"></A></TD>

	<TD width="111" align="center"><A href="images/MichelleMaylene_theReachIn_0039.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0039.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0039"></A></TD>

	<TD width="111" align="center"><A href="images/MichelleMaylene_theReachIn_0043.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0043.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0043"></A></TD>

</TR>







<TR>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0049.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0049.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0049"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0055.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0055.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0055"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0089.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0089.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0089"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0105.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0105.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0105"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0145.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0145.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0145"></A></TD>

</TR>







<TR>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0165.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0165.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0165"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0225.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0225.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0225"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0255.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0255.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0255"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0267.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0267.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0267"></A></TD>

		<TD align="center"><A href="images/MichelleMaylene_theReachIn_0285.jpg"><IMG src="thumbnails/MichelleMaylene_theReachIn_0285.jpg" height="160" width="104" border="0" alt="MichelleMaylene_theReachIn_0285"></A></TD>

</TR>

<TR>

  <TD colspan="5" align="center" bgcolor="#FFFFCC"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Michelle Maylene was   supposed to perform in a <a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=925539-0017&PA=$afid&HTML=http://www.balloonfrenzy.com/index.php">solo shoot</a>, but her nympho spirits made her so horny so   she asked one of the stage workers to finger her pussy and ass.</strong></font></TD>

  </TR>

</TABLE>

<br>

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

                    HERE TO ENTER BABE CENTERFOLDS</strong></font></a> </div><br>





<div align="center">

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

    <font face="Verdana, Arial, Helvetica, sans-serif"><strong>18

    U.S.C. 2257 Record-Keeping Requirements Compliance Statement</strong></font>

    </font></strong></font>at:<br>

  http://xxxspacegirls.us/18-statement/18-statement.html</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

	}

}



