#!/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>Office Slut Blue Diamond penetrated by big ebony cock</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="970" border="0" align="center" cellpadding="2" cellspacing="2">
          <TR>
            <TD colspan="5" align="center"><h3>Office Slut Blue Diamond penetrated by big ebony cock</h3>
             	A hot, tall and sexy office freak has come home from a hard days work.  She has just bought her new place cause she was promoted to an  executive position, she knows how to manage the offfice, but not her  house. She calls the mailroom guy over to help her move boxes...wow the  mail-room guy brings his work home...Blu Diamond not only needs him to  move boxes, but other areas need assistance too....He arrives and she  instantly notices...<strong>read the whole story on FuckMeBlack.com!</strong></TD>
          </TR>
          <TR>
            <TD align="center"><A href="images/BluDiamondJdepthST6_002.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_002.jpg" height="275" width="183" alt="BluDiamondJdepthST6_002"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_003.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_003.jpg" height="275" width="183" alt="BluDiamondJdepthST6_003"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_106.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_106.jpg" height="275" width="183" alt="BluDiamondJdepthST6_106"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_126.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_126.jpg" height="275" width="183" alt="BluDiamondJdepthST6_126"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_200.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_200.jpg" height="275" width="183" alt="BluDiamondJdepthST6_200"></A></TD>
          </TR>
          <TR>
            <TD align="center"><A href="images/BluDiamondJdepthST6_212.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_212.jpg" height="275" width="183" alt="BluDiamondJdepthST6_212"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_286.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_286.jpg" height="275" width="183" alt="BluDiamondJdepthST6_286"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_298.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_298.jpg" height="275" width="183" alt="BluDiamondJdepthST6_298"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_304.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_304.jpg" height="275" width="183" alt="BluDiamondJdepthST6_304"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_309.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_309.jpg" height="275" width="183" alt="BluDiamondJdepthST6_309"></A></TD>
          </TR>
          <TR>
            <TD align="center"><A href="images/BluDiamondJdepthST6_330.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_330.jpg" height="275" width="183" alt="BluDiamondJdepthST6_330"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_342.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_342.jpg" height="275" width="183" alt="BluDiamondJdepthST6_342"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_354.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_354.jpg" height="275" width="183" alt="BluDiamondJdepthST6_354"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_370.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_370.jpg" height="275" width="183" alt="BluDiamondJdepthST6_370"></A></TD>
            <TD align="center"><A href="images/BluDiamondJdepthST6_382.jpg"><IMG src="thumbnails/BluDiamondJdepthST6_382.jpg" height="275" width="183" alt="BluDiamondJdepthST6_382"></A></TD>
          </TR>
          

          
          <TR>
            <TD align="center">&nbsp;</TD>
            <TD align="center">&nbsp;</TD>
            <TD align="center">&nbsp;</TD>
            <TD align="center">&nbsp;</TD>
            <TD align="center">&nbsp;</TD>
          </TR>
          <TR>
            <TD colspan="5" 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 colspan="5" align="center">&nbsp;</TD>
          </TR>
          <TR>
            <TD colspan="5" align="center">Copyright: FUCK ME BLACK . COM<br>
       18 U.S.C. 2257 Record-Keeping Requirements Compliance Statement 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
	}
}

