#!/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>Big boob teen secretary and MILF boss popping big balloons</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../../MBP.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<table width="1020" 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-0000&PA=$afid&HTML=http://www.myballoonporn.com/index.php"><img src="../../images/join_01.jpg" alt="my fetish balloon porn videos" width="1020" height="257" border="0"></a></td>
  </tr>
	<tr>
		<td align="center" class="ViewClipBG"><TABLE width="962" border=0  align="center" cellpadding=5 cellspacing=5>

<TR>
  <TD colspan="3" align="center"><h2>Big boob teen secretary and MILF boss popping big balloons</h2>
  
 Big boob Latina secretary Cassandra blew up a lot of big colorful balloons and   decorated the office of her MILF boss Lya Pink. The naive babe Cassandra was   thinking that boss Lya will be happily surprised. When MILF Lya arrived in the   office she was shocked. She liked her office very ordered and neat. The big   balloons were giving her claustrophobia. She called Cassandra and ordered her to   pop the balloons. The innocent girl started popping the balloons with her pen,   when she slipped and sat one of them. The big balloon popped very laud under the   muscular big tit Latina's but. Kinky MILF Lya found it very...Read the whole story on MyBalloonPorn.com!</TD>
  </TR>
<TR>
  <TD align="center"><A href="images/DSC_0012.jpg"><IMG src="thumbnails/DSC_0012.jpg" height="199" width="300" alt="DSC_0012"></A></TD>
  <TD align="center"><A href="images/DSC_0016.jpg"><IMG src="thumbnails/DSC_0016.jpg" height="199" width="300" alt="DSC_0016"></A></TD>
  <TD align="center"><A href="images/DSC_0019.jpg"><IMG src="thumbnails/DSC_0019.jpg" height="199" width="300" alt="DSC_0019"></A></TD>
</TR>
<TR>
  <TD align="center"><A href="images/DSC_0038.jpg"><IMG src="thumbnails/DSC_0038.jpg" height="199" width="300" alt="DSC_0038"></A></TD>
  <TD align="center"><A href="images/DSC_0129.jpg"><IMG src="thumbnails/DSC_0129.jpg" height="199" width="300" alt="DSC_0129"></A></TD>
  <TD align="center"><A href="images/DSC_0134.jpg"><IMG src="thumbnails/DSC_0134.jpg" height="199" width="300" alt="DSC_0134"></A></TD>
</TR>
<TR>
  <TD align="center"><A href="images/DSC_0154.jpg"><IMG src="thumbnails/DSC_0154.jpg" height="199" width="300" alt="DSC_0154"></A></TD>
  <TD align="center"><A href="images/DSC_0156.jpg"><IMG src="thumbnails/DSC_0156.jpg" height="199" width="300" alt="DSC_0156"></A></TD>
  <TD align="center"><A href="images/DSC_0167.jpg"><IMG src="thumbnails/DSC_0167.jpg" height="199" width="300" alt="DSC_0167"></A></TD>
</TR>
<TR>
  <TD align="center"><A href="images/DSC_0171.jpg"><IMG src="thumbnails/DSC_0171.jpg" height="199" width="300" alt="DSC_0171"></A></TD>
  <TD align="center"><A href="images/DSC_0173.jpg"><IMG src="thumbnails/DSC_0173.jpg" height="199" width="300" alt="DSC_0173"></A></TD>
  <TD align="center"><A href="images/DSC_0176.jpg"><IMG src="thumbnails/DSC_0176.jpg" height="199" width="300" alt="DSC_0176"></A></TD>
</TR>
<TR>
  <TD align="center"><A href="images/DSC_0179.jpg"><IMG src="thumbnails/DSC_0179.jpg" height="199" width="300" alt="DSC_0179"></A></TD>
  <TD align="center"><A href="images/DSC_0181.jpg"><IMG src="thumbnails/DSC_0181.jpg" height="199" width="300" alt="DSC_0181"></A></TD>
  <TD align="center"><A href="images/DSC_0234.jpg"><IMG src="thumbnails/DSC_0234.jpg" height="199" width="300" alt="DSC_0234"></A></TD>
</TR>
<TR>
  <TD width="304" align="center">&nbsp;</TD>
  <TD width="304" align="center">&nbsp;</TD>
  <TD width="304" align="center">&nbsp;</TD>
</TR>
<TR>
  <TD colspan="3" align="center"><a href="http://refer.ccbill.com/cgi-bin/clicks.cgi?CA=940106-0000&PA=$afid&HTML=http://www.myballoonporn.com/index.php" class="EnterText"><span class="EnterText">CLICK HERE TO ENTER MY BALLOON PORN</span></a></TD>
  </TR>
<TR>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
</TR>
<TR>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
  <TD align="center">&nbsp;</TD>
</TR>
<TR>
  <TD colspan="3" align="center">Copyright: MY BALLOON PORN. COM<br>
2257 Info URL at:<br>
http://myballoonporn.com/2257.html</TD>
  </TR>


</TABLE></td>
  </tr>
	<tr>
		<td>
			<img src="../../images/join_03.jpg" width="1020" height="65" alt=""></td>
  </tr>
	<tr>
		<td>
			<img src="../../images/join_04.jpg" width="1020" height="79" alt="sexy tattoo babes popping huge porn balloons"></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

	}

}



