#!/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>BBW Victoria Secret lounging by the Pool</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" cellpadding=0 cellspacing=5>

            <TR>

              <TD colspan="3" align="center"><h1>BBW Victoria Secret lounging by the Pool</h1>

              It's been a very long time since Victoria has come to hang with me and when I had the chance to speak with her again...she told me she wanted to marry me! LOLOL, I'm just kidding, I'm just kidding but I was very happy to have her on set once again, we talked a lot about the industry and how some of her experiences have been in the industry. I'd like to think that I'm her favorite guy in the industry but I'll let her tell it. I got some pretty good behind the scenes footage and we basically just enjoyed our day. Visit my <a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=940106-0019&PA=$afid&HTML=http://www.cjwrightxxx.com/forum/">FORUM</a> and let me know what you think!</TD>

              </TR>

            <TR>

              <TD width="280" align="center"><A href="images/VictoriaSecretPool_005.jpg"><IMG src="thumbnails/VictoriaSecretPool_005.jpg" height="182" width="275" alt="VictoriaSecretPool_005"></A></TD>

              <TD width="280" align="center"><A href="images/VictoriaSecretPool_030.jpg"><IMG src="thumbnails/VictoriaSecretPool_030.jpg" height="182" width="275" alt="VictoriaSecretPool_030"></A></TD>

              <TD width="280" align="center"><A href="images/VictoriaSecretPool_048.jpg"><IMG src="thumbnails/VictoriaSecretPool_048.jpg" height="182" width="275" alt="VictoriaSecretPool_048"></A></TD>

            </TR>

            <TR>

              <TD align="center"><A href="images/VictoriaSecretPool_119.jpg"><IMG src="thumbnails/VictoriaSecretPool_119.jpg" height="182" width="275" alt="VictoriaSecretPool_119"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_149.jpg"><IMG src="thumbnails/VictoriaSecretPool_149.jpg" height="182" width="275" alt="VictoriaSecretPool_149"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_166.jpg"><IMG src="thumbnails/VictoriaSecretPool_166.jpg" height="182" width="275" alt="VictoriaSecretPool_166"></A></TD>

            </TR>

            <TR>

              <TD align="center"><A href="images/VictoriaSecretPool_218.jpg"><IMG src="thumbnails/VictoriaSecretPool_218.jpg" height="182" width="275" alt="VictoriaSecretPool_218"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_267.jpg"><IMG src="thumbnails/VictoriaSecretPool_267.jpg" height="182" width="275" alt="VictoriaSecretPool_267"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_317.jpg"><IMG src="thumbnails/VictoriaSecretPool_317.jpg" height="182" width="275" alt="VictoriaSecretPool_317"></A></TD>

            </TR>

            <TR>

              <TD align="center"><A href="images/VictoriaSecretPool_335.jpg"><IMG src="thumbnails/VictoriaSecretPool_335.jpg" height="182" width="275" alt="VictoriaSecretPool_335"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_350.jpg"><IMG src="thumbnails/VictoriaSecretPool_350.jpg" height="182" width="275" alt="VictoriaSecretPool_350"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_365.jpg"><IMG src="thumbnails/VictoriaSecretPool_365.jpg" height="182" width="275" alt="VictoriaSecretPool_365"></A></TD>

            </TR>

            <TR>

              <TD align="center"><A href="images/VictoriaSecretPool_393.jpg"><IMG src="thumbnails/VictoriaSecretPool_393.jpg" height="182" width="275" alt="VictoriaSecretPool_393"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_437.jpg"><IMG src="thumbnails/VictoriaSecretPool_437.jpg" height="182" width="275" alt="VictoriaSecretPool_437"></A></TD>

              <TD align="center"><A href="images/VictoriaSecretPool_485.jpg"><IMG src="thumbnails/VictoriaSecretPool_485.jpg" height="182" width="275" alt="VictoriaSecretPool_485"></A></TD>

            </TR>

            <TR>

              <TD colspan="3" 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>



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

	}

}



