#!/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.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~";


<html>
<head>
<title>Fat MILF and BBW lesbian babe sharing a husband</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../../fmb.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<table width="1020" height="809" border="0" align="center" cellpadding="0" cellspacing="0" id="Table_01">
<tr>
		<td>
			<a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=940106-0028&PA=$afid&HTML=http://www.wildbbwporn.com/index.php"><img src="../template/View_Clip_01.jpg" alt="horny fat russian babes drilled by armenian lovers" width="1020" height="243" border="0"></a></td>
  </tr>
	<tr>
		<td class="FLVbg" height="466"><TABLE width="908" border=0  align="center" cellspacing=20>

<TR>
  <TD colspan="3" align="center"><h1>Fat MILF and BBW lesbian sharing a husband</h1>
    This is another wild <strong>BBW</strong> porn movie featuring <strong>fat</strong> MILF and sexy young BBW engaged in kinky lesbian sex and hardcore action. The kinky fat MILF Madlena needed to spice her sexual live by inviting a sweet big ass <strong>BBW</strong> babe in her bed. Her husband was also very excited to dip his dick in the fresh <strong>fat</strong> pussy and to get a double silky blowjob. Check out this fat hardcore movie and find out if the kinky MILF was...<strong>read the whole story on wildBBWporn.com!</strong></TD>
  </TR>
<TR>
  <TD width="274" align="center"><A href="images/DSCF5826.jpg"><IMG src="thumbnails/DSCF5826.jpg" height="180" width="270" alt="DSCF5826"></A></TD>
  <TD width="274" align="center"><A href="images/DSCF5830.jpg"><IMG src="thumbnails/DSCF5830.jpg" height="180" width="270" alt="DSCF5830"></A></TD>
  <TD width="274" align="center"><A href="images/DSCF5832.jpg"><IMG src="thumbnails/DSCF5832.jpg" height="180" width="270" alt="DSCF5832"></A></TD>
</TR>
<TR>
  <TD align="center"><a href="images/DSCF5840.jpg"><img src="thumbnails/DSCF5840.jpg" height="180" width="270" alt="DSCF5840"></a></TD>
  <TD align="center"><a href="images/DSCF5849.jpg"><img src="thumbnails/DSCF5849.jpg" height="180" width="270" alt="DSCF5849"></a></TD>
  <TD align="center"><a href="images/DSCF5851.jpg"><img src="thumbnails/DSCF5851.jpg" height="180" width="270" alt="DSCF5851"></a></TD>
</TR>
<TR>
  <TD align="center"><a href="images/DSCF5853.jpg"><img src="thumbnails/DSCF5853.jpg" height="180" width="270" alt="DSCF5853"></a></TD>
  <TD align="center"><a href="images/DSCF5861.jpg"><img src="thumbnails/DSCF5861.jpg" height="180" width="270" alt="DSCF5861"></a></TD>
  <TD align="center"><a href="images/DSCF5862.jpg"><img src="thumbnails/DSCF5862.jpg" height="180" width="270" alt="DSCF5862"></a></TD>
</TR>
<TR>
  <TD align="center"><a href="images/DSCF5869.jpg"><img src="thumbnails/DSCF5869.jpg" height="180" width="270" alt="DSCF5869"></a></TD>
  <TD align="center"><a href="images/DSCF5883.jpg"><img src="thumbnails/DSCF5883.jpg" height="180" width="270" alt="DSCF5883"></a></TD>
  <TD align="center"><a href="images/DSCF5897.jpg"><img src="thumbnails/DSCF5897.jpg" height="180" width="270" alt="DSCF5897"></a></TD>
</TR>
<TR>
  <TD align="center"><a href="images/DSCF5898.jpg"><img src="thumbnails/DSCF5898.jpg" height="180" width="270" alt="DSCF5898"></a></TD>
  <TD align="center"><a href="images/DSCF5903.jpg"><img src="thumbnails/DSCF5903.jpg" height="180" width="270" alt="DSCF5903"></a></TD>
  <TD align="center"><a href="images/DSCF5912.jpg"><img src="thumbnails/DSCF5912.jpg" height="180" width="270" alt="DSCF5912"></a></TD>
</TR>

<TR>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
</TR>
<TR>
  <TD colspan="3" align="center"><a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=940106-0028&PA=$afid&HTML=http://www.wildbbwporn.com/index.php" class="EnterText">CLICK HERE TO ENTER WILD BBW PORN</a></TD>
  </TR>
<TR>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
</TR>
<TR>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
</TR>
<TR>
  <TD colspan="3" align="center">2257 info at: http://wildbbwporn.com/2257.html</TD>
  </TR>


</TABLE>
	  </td>
	</tr>
	<tr>
		<td>
			<img src="../template/View_Clip_03.jpg" width="1020" height="100" alt="wild BBW porn"></td>
  </tr>
</table>

</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

	}

}



