#!/usr/bin/perl use CGI qw(param); open(HITS, "Hits.txt"); $hits = ; close(HITS); ######################################## $hits++; ######################################## open(ADDHITS, ">Hits.txt"); print ADDHITS "$hits"; close(ADDHITS); ######################################## print "Content-Type: text/html\n\n"; print <<body bgcolor="090909" address="hidden"> <center><table border="0" bgcolor="353535" cellpadding="3" cellspacing="2"><td bgcolor="101010" absheight="30" align="center" width="350"><font size="3" color="be9c1a" effect="shadow"> <blackface><limittext value="JavaScript Bug (Reload Page)"></td><td bgcolor="101010" align="center" width="50"><font size="3" color="be9c1a" effect="shadow"><blackface><limittext value="?"></td></table></center><noembed> X TraX & UpLoad
X TraX & UpLoad
$hits Users logged currently




  • You can now EXTRACT and TRANSLOAD images songs sounds from any place that has a address with this utility...For best performance Max file limit should be around twenty files...






    • IMG
    		LINKS
    		BG
    		TXT
    URL:
    </BODY> </HTML> EOF exit;