#!/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>Horny Big Boob Housewife Sara Jay  drilled by huge black dick in this Interracial Sex Scene</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-0024&PA=$afid&HTML=http://www.fuckmeblack.com/index.php"><img src="../template/View_Clip_01.jpg" alt="free interracial movies" width="1020" height="243" border="0"></a></td>
  </tr>
	<tr>
		<td class="FLVbg" height="466"><TABLE width="962" border=0  align="center" cellpadding=5 cellspacing=5>

<TR>
  <TD colspan="3" align="center"><h3>Horny Big Boob Housewife Sara Jay  drilled by huge black dick in this Interracial Sex Scene</h3>
             	In this kinky interracial movie big boob MILF Sara Jay was able to   seduce her music teacher. Hot MILF Sara was trying to learn how to play   the flute, but she had no talent t all. The shy music teacher was trying   for several weeks very hard to make her learn something, but there was   no success. Big boob and hot ass Sara could not help it at all, instead   of learning about the flute she was only thinking how to seduce the...<strong>read the whole story on FuckMeBlack.com!</strong></TD>
  </TR>
<TR>
		<TD width="304" align="center"><A href="images/IMG_6083.jpg"><IMG src="thumbnails/IMG_6083.jpg" height="200" width="300" alt="IMG_6083"></A></TD>
		<TD width="304" align="center"><A href="images/IMG_6089.jpg"><IMG src="thumbnails/IMG_6089.jpg" height="200" width="300" alt="IMG_6089"></A></TD>
		<TD width="304" align="center"><A href="images/IMG_6173.jpg"><IMG src="thumbnails/IMG_6173.jpg" height="200" width="300" alt="IMG_6173"></A></TD>
</TR>



<TR>
		<TD align="center"><A href="images/IMG_6175.jpg"><IMG src="thumbnails/IMG_6175.jpg" height="200" width="300" alt="IMG_6175"></A></TD>
		<TD align="center"><A href="images/IMG_6223.jpg"><IMG src="thumbnails/IMG_6223.jpg" height="200" width="300" alt="IMG_6223"></A></TD>
		<TD align="center"><A href="images/IMG_6229.jpg"><IMG src="thumbnails/IMG_6229.jpg" height="200" width="300" alt="IMG_6229"></A></TD>
</TR>



<TR>
		<TD align="center"><A href="images/IMG_6261.jpg"><IMG src="thumbnails/IMG_6261.jpg" height="200" width="300" alt="IMG_6261"></A></TD>
		<TD align="center"><A href="images/IMG_6268.jpg"><IMG src="thumbnails/IMG_6268.jpg" height="200" width="300" alt="IMG_6268"></A></TD>
		<TD align="center"><A href="images/IMG_6277.jpg"><IMG src="thumbnails/IMG_6277.jpg" height="200" width="300" alt="IMG_6277"></A></TD>
</TR>



<TR>
		<TD align="center"><A href="images/IMG_6298.jpg"><IMG src="thumbnails/IMG_6298.jpg" height="200" width="300" alt="IMG_6298"></A></TD>
		<TD align="center"><A href="images/IMG_6301.jpg"><IMG src="thumbnails/IMG_6301.jpg" height="200" width="300" alt="IMG_6301"></A></TD>
		<TD align="center"><A href="images/IMG_6313.jpg"><IMG src="thumbnails/IMG_6313.jpg" height="200" width="300" alt="IMG_6313"></A></TD>
</TR>


<TR>
		<TD align="center"><A href="images/IMG_6315.jpg"><IMG src="thumbnails/IMG_6315.jpg" height="200" width="300" alt="IMG_6315"></A></TD>
		<TD align="center"><A href="images/IMG_6318.jpg"><IMG src="thumbnails/IMG_6318.jpg" height="200" width="300" alt="IMG_6318"></A></TD>
		<TD align="center"><A href="images/IMG_6348.jpg"><IMG src="thumbnails/IMG_6348.jpg" height="200" width="300" alt="IMG_6348"></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-0024&PA=$afid&HTML=http://www.fuckmeblack.com/index.php" class="EnterText"><span class="EnterText">CLICK HERE TO ENTER FUCK ME BLACK</span></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 URL at:<br>
  http://fuckmeblack.com/2257.html</TD>
  </TR>


</TABLE>		</td>
	</tr>
	<tr>
		<td>
			<img src="../template/View_Clip_03.jpg" width="1020" height="100" alt=""></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
	}
}

