#!/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=xdw.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>Black babe Aryana Starr and big cock Ethan in Ass Hunt</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>Black babe Aryana Starr and big cock Ethan in Ass Hunt</h3>
             	Aryana Starr was the cover girl for MPB5 and she came through with a lot ass,   aggression and passion, sounds like an untame <A href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=940106-0024&PA=$afid&HTML=http://xxxhorror.com/index.php">sex beast</A>. I had to put my man Ethan   on the Hunt to tame this wild chick. The head skills would bring tears to the   average man because her full lips alone would put you on the bone. I'm usually   on the hunt for a nice phat ass, but i am one to share so...<strong>read the whole story on FuckMeBlack.com!</strong></TD>
          </TR>
          <TR>
            <TD align="center"><A href="images/AriannaStarr_1321.jpg"><IMG src="thumbnails/AriannaStarr_1321.jpg" height="275" width="183" alt="AriannaStarr_1321"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1349.jpg"><IMG src="thumbnails/AriannaStarr_1349.jpg" height="275" width="183" alt="AriannaStarr_1349"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1367.jpg"><IMG src="thumbnails/AriannaStarr_1367.jpg" height="275" width="183" alt="AriannaStarr_1367"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1401.jpg"><IMG src="thumbnails/AriannaStarr_1401.jpg" height="275" width="183" alt="AriannaStarr_1401"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1440.jpg"><IMG src="thumbnails/AriannaStarr_1440.jpg" height="275" width="183" alt="AriannaStarr_1440"></A></TD>
          </TR>
          <TR>
            <TD align="center"><A href="images/AriannaStarr_1518.jpg"><IMG src="thumbnails/AriannaStarr_1518.jpg" height="275" width="183" alt="AriannaStarr_1518"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1524.jpg"><IMG src="thumbnails/AriannaStarr_1524.jpg" height="275" width="183" alt="AriannaStarr_1524"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1526.jpg"><IMG src="thumbnails/AriannaStarr_1526.jpg" height="275" width="183" alt="AriannaStarr_1526"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1542.jpg"><IMG src="thumbnails/AriannaStarr_1542.jpg" height="275" width="183" alt="AriannaStarr_1542"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1548.jpg"><IMG src="thumbnails/AriannaStarr_1548.jpg" height="275" width="183" alt="AriannaStarr_1548"></A></TD>
          </TR>
          <TR>
            <TD align="center"><A href="images/AriannaStarr_1566.jpg"><IMG src="thumbnails/AriannaStarr_1566.jpg" height="275" width="183" alt="AriannaStarr_1566"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1580.jpg"><IMG src="thumbnails/AriannaStarr_1580.jpg" height="275" width="183" alt="AriannaStarr_1580"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1590.jpg"><IMG src="thumbnails/AriannaStarr_1590.jpg" height="275" width="183" alt="AriannaStarr_1590"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1599.jpg"><IMG src="thumbnails/AriannaStarr_1599.jpg" height="275" width="183" alt="AriannaStarr_1599"></A></TD>
            <TD align="center"><A href="images/AriannaStarr_1636.jpg"><IMG src="thumbnails/AriannaStarr_1636.jpg" height="275" width="183" alt="AriannaStarr_1636"></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 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"><!-- {RECIPS} --></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">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

	}

}



