#!/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">
<HTML>
<HEAD>
<TITLE>Sharon Wild in Alien Abduction</TITLE>

<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="778" border="1" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td><a href="http://tracker.zombaio.com/?$afid.7876960"><img src="../../header/GalacticPornGirls.jpg" alt="galactic girls performing in alien sex and SciFi Porn movies" width="778" height="210" border="0"></a></td>
        </tr>
        <tr>
          <td><TABLE  align="center" border=0>

<TR>
  <TD colspan="5" align="center"><h1>Sharon Wild in Alien Abduction</h1>
  Sharon Wild has been transported to the "Alien Sexual Training Facility" from   the seeming safety of her bed, after her Sex Play Orgasm! As her Pussy is still   Hot and Wet, she becomes the willing victim of EXTRATERRESTRIAL MIND CONTROL   pushing Sharon to use the Alien Probes and begin her ALIEN SEX   TRANSFORMATION!</TD>
  </TR>
<TR>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0001.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0001.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0001"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0036.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0036.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0036"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0056.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0056.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0056"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0075.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0075.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0075"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0152.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0152.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0152"></A></TD>
</TR>
<TR>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0200.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0200.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0200"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0222.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0222.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0222"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0252.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0252.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0252"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0308.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0308.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0308"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0316.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0316.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0316"></A></TD>
</TR>
<TR>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0332.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0332.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0332"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0338.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0338.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0338"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0341.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0341.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0341"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0360.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0360.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0360"></A></TD>
  <TD align="center"><A href="images/SharonWild_AlienAbduction_0374.jpg"><IMG src="thumbnails/SharonWild_AlienAbduction_0374.jpg" height="220" width="143" alt="SharonWild_AlienAbduction_0374"></A></TD>
</TR>



</TABLE></td>
        </tr>
    </table>
</td>
  </tr>
</table>
<br>
<div align="center"><a href="http://tracker.zombaio.com/?$afid.7876960"><font size="6">CLICK HERE TO ENTER GALACTIC GIRLS</font></a></div>
<br>


<br>
<div align="center">GalacticGirls&#8482;<strong><br>
18 U.S.C. 2257 Record-Keeping Requirements Compliance Statement<br>
http://tracker.zombaio.com/?$afid.7876960
</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
	}
}

