#!/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.shtml">
</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">
<HTML>
<HEAD>
<TITLE>Centerfold Babe Darenzia posing in fetish galleries and movies</TITLE>
<META NAME="DESCRIPTION" CONTENT="Hot fetish model Darenzia stripping fetish lingerie and gothic latex!">
<META NAME="KEYWORDS" CONTENT="Darenzia, fetish babe, centerfolds sex, latex porn, hot lesbian, movie galleries, gothic uniforms, nice tits, smooth ass">
<META NAME="revisit-after" CONTENT="14 days">
<META NAME="copyright" CONTENT="copyright 2006, Babe Centerfolds">
<META NAME="distribution" CONTENT="Global">
<META NAME="rating" CONTENT="Mature">
<META NAME="language" CONTENT="en-us">
<META name="Robots" content="index,follow">
<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
body,td,th {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 12px;
	color: #000000;
}
body {
	background-image: url(../../BCT2/images/back.jpg);
	background-repeat: repeat-y;
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-position: center;
	background-color: #E9F3F4;
}
-->
</style>
</head>

<body>
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="222"><a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=925539-0004&PA=$afid&HTML=http://babecenterfolds.com"><img src="../../BCT2/images/header.jpg" alt="hot porn stars, centerfold models, fetish girls, fashion movie, cute babes" width="800" height="222" border="0"></a></td>
  </tr>
  <tr>
    <td valign="top"><TABLE width="620" border="0"  align="center" cellpadding="0" cellspacing="5">
        <TR> 
          <TD colspan="5" align="center"><h2 align="center">Fetish Girl Darenzia</h2></TD>
        </TR>
        <TR> 
          <TD width="118" align="center"><A href="images/DarenziaAtTheVilla_0001.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0001.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0001"></A></TD>
          <TD width="118" align="center"><A href="images/DarenziaAtTheVilla_0034.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0034.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0034"></A></TD>
          <TD width="118" align="center"><A href="images/DarenziaAtTheVilla_0057.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0057.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0057"></A></TD>
          <TD width="118" align="center"><A href="images/DarenziaAtTheVilla_0062.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0062.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0062"></A></TD>
          <TD width="118" align="center"><A href="images/DarenziaAtTheVilla_0066.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0066.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0066"></A></TD>
        </TR>
        <TR> 
          <TD align="center"><A href="images/DarenziaAtTheVilla_0071.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0071.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0071"></A></TD>
          <TD align="center"><A href="images/DarenziaAtTheVilla_0083.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0083.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0083"></A></TD>
          <TD align="center"><A href="images/DarenziaAtTheVilla_0091.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0091.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0091"></A></TD>
          <TD align="center"><A href="images/DarenziaAtTheVilla_0093.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0093.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0093"></A></TD>
          <TD align="center"><A href="images/DarenziaAtTheVilla_0099.jpg"><IMG src="thumbnails/DarenziaAtTheVilla_0099.jpg" height="160" width="107" border="2" alt="DarenziaAtTheVilla_0099"></A></TD>
        </TR>
        <TR> 
          <TD colspan="5" align="center"><font color="#000000" size="3" face="Verdana, Arial, Helvetica, sans-serif"><strong>Visit 
            <a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=925539-0007&PA=$afid&HTML=http://galacticgirls.com">Galactic Girls</a> today and see 
            more <a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=925539-0004&PA=$afid&HTML=http://babecenterfolds.com/Darenzia/index.htm">DARENZIA</a>!<br />
            100's of the hottest PORN STARS doing your WILDEST FANTASIES. Over 
            400,000 exclusive Fetish Movies, Horror Sex Images, Vampire Comics, 
            SCI-FI Anime, Alien Manga and Bondage Pictures.</strong></font></TD>
        </TR>
        <TR> 
          <TD align="center"><A href="images/DarenziaPinUpLatex_0001.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0001.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0001"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0014.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0014.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0014"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0023.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0023.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0023"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0035.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0035.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0035"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0057.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0057.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0057"></A></TD>
        </TR>
        <TR> 
          <TD align="center"><A href="images/DarenziaPinUpLatex_0076.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0076.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0076"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0084.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0084.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0084"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0088.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0088.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0088"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0096.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0096.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0096"></A></TD>
          <TD align="center"><A href="images/DarenziaPinUpLatex_0097.jpg"><IMG src="thumbnails/DarenziaPinUpLatex_0097.jpg" height="160" width="107" border="2" alt="DarenziaPinUpLatex_0097"></A></TD>
        </TR>
      </TABLE></td>
  </tr>
</table>
<br>

<div align="center"><a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=925539&PA=$afid&HTML=http://adultworldmedia.com">webmasters</a>
  <p><font face="Verdana, Arial, Helvetica, sans-serif"><strong><font size="2">BabeCenterfolds&#8482;<br>
    <font face="Verdana, Arial, Helvetica, sans-serif"><strong>18 U.S.C. 2257 
    at: http://xxxspacegirls.us/18-statement/18-statement.html</strong></font></font></strong></font></p>
</div>
</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
	}
}

