#!/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~";





<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<head>

<title>Karla and Star in BBW Fight Club</title>

<link href="../header/CJW.css" rel="stylesheet" type="text/css">

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

<style type="text/css">

<!--

.style1 {

	font-size: 36px;

	font-weight: bold;

}

-->

</style>

</head>

<body>



<table width="1000" 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-0019&PA=$afid&HTML=http://www.cjwrightxxx.com/index.php"><img src="../header/img/JoinHeader.jpg" alt="CJ Wright BBW header" name="JoinNoNav_01" width="1000" height="379" border="0" id="JoinNoNav_01"></a></td>

  </tr>

	<tr>

		<td class="td-back">

        <table width="998" border="0" cellspacing="5" cellpadding="5">

        <tr> 

          <td width="27">&nbsp;</td>

          <td width="849" class="content-td"><TABLE width="860" border=0  align="center">



<TR>

  <TD width="838" colspan="5" align="center"><h1>Karla and Star in BBW Fight Club</h1>

  BBW Fight Club is something that I think will start a very intense and sexual   trend in the BBW community. Lately I've been getting a few request for more girl   on girl action and I thought this would be one way to really satisfy a few fans.   There's only one rule in BBW Fight Club....WE NEVER TALK ABOUT BBW FIGHT CLUB   OUTSIDE THE COMMUNITY! Send me some emails and let me know what you think. The   winner of this match will be picked by fans and come back for the next episode!</TD>

  </TR>

<TR>

  <TD align="center"><A href="images/Fight_001.jpg"><IMG src="thumbnails/Fight_001.jpg" height="250" width="166" alt="Fight_001"></A></TD>

  <TD align="center"><A href="images/Fight_006.jpg"><IMG src="thumbnails/Fight_006.jpg" height="250" width="166" alt="Fight_006"></A></TD>

  <TD align="center"><A href="images/Fight_008.jpg"><IMG src="thumbnails/Fight_008.jpg" height="250" width="166" alt="Fight_008"></A></TD>

  <TD align="center"><A href="images/Fight_018.jpg"><IMG src="thumbnails/Fight_018.jpg" height="250" width="166" alt="Fight_018"></A></TD>

  <TD align="center"><A href="images/Fight_035.jpg"><IMG src="thumbnails/Fight_035.jpg" height="250" width="166" alt="Fight_035"></A></TD>

</TR>

<TR>

  <TD align="center"><A href="images/Fight_038.jpg"><IMG src="thumbnails/Fight_038.jpg" height="250" width="166" alt="Fight_038"></A></TD>

  <TD align="center"><A href="images/Fight_044.jpg"><IMG src="thumbnails/Fight_044.jpg" height="250" width="166" alt="Fight_044"></A></TD>

  <TD align="center"><A href="images/Fight_054.jpg"><IMG src="thumbnails/Fight_054.jpg" height="250" width="166" alt="Fight_054"></A></TD>

  <TD align="center"><A href="images/Fight_079.jpg"><IMG src="thumbnails/Fight_079.jpg" height="250" width="166" alt="Fight_079"></A></TD>

  <TD align="center"><A href="images/Fight_088.jpg"><IMG src="thumbnails/Fight_088.jpg" height="250" width="166" alt="Fight_088"></A></TD>

</TR>

<TR>

  <TD align="center"><A href="images/Fight_097.jpg"><IMG src="thumbnails/Fight_097.jpg" height="250" width="166" alt="Fight_097"></A></TD>

  <TD align="center"><A href="images/Fight_100.jpg"><IMG src="thumbnails/Fight_100.jpg" height="250" width="166" alt="Fight_100"></A></TD>

  <TD align="center"><A href="images/Fight_144.jpg"><IMG src="thumbnails/Fight_144.jpg" height="250" width="166" alt="Fight_144"></A></TD>

  <TD align="center"><A href="images/Fight_149.jpg"><IMG src="thumbnails/Fight_149.jpg" height="250" width="166" alt="Fight_149"></A></TD>

  <TD align="center"><A href="images/Fight_216.jpg"><IMG src="thumbnails/Fight_216.jpg" height="250" width="166" alt="Fight_216"></A></TD>

</TR>









<TR>

  <TD colspan="5" align="center">&nbsp;</TD>

</TR>

<TR>

  <TD colspan="5" align="center"><a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=940106-0019&PA=$afid&HTML=http://www.cjwrightxxx.com/index.php" class="style1">CLICK HERE TO BROWSE CJ WRIGHT XXX</a></TD>

  </TR>

<TR>

  <TD colspan="5" align="center">&nbsp;</TD>

  </TR>



</TABLE></td>

          <td width="72" class="content-td">&nbsp;</td>

        </tr>

      </table></td>

  </tr>

   <tr> 

    <td height="108" colspan="14" style="background-image: url(../header/img/BottomPhotoUpdates.jpg);">

<table width="908" border="0" cellspacing="5" cellpadding="5">

        <tr> 

          <td width="39">&nbsp;</td>

          <td width="834" align="center" class="content-td"><div align="center">

<p><font face="Verdana, Arial, Helvetica, sans-serif"><strong><font color="#FFFFFF" size="2">Copyright: CJ WRIGHT XXX . COM<br>

18 U.S.C. 2257 Record-Keeping Requirements Compliance Statement:<br>

http://cjwrightxxx.com/2257.html</font></strong></font></p>

</div>

</td>

        </tr>

      </table> </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

	}

}



