dead_puppy's Journal: Be an asshole: Enlarge your page

This is page_enlarger.pl, version 6.6.6.  It is a small, portable Perl script that can be run across a myriad of systems.

-------- cut ----------------------

srand;
($outputfile) = @ARGV;
if($outputfile) {
   open(OUTPUTFILE, ">$outputfile") || die "couldn't open $outputfile: $!";
   select OUTPUTFILE;
}

print "<a href=\"http://goatse.cx\">\n";
$randnum = rand 10;
for($i = 0; $i < 1000; $i++) {
   printf "%d\n", $randnum;
   $randnum = rand 10;
}
print "</a>\n";

-------- cut ----------------------

Change as you like - this is software is protected by the GPL and RMS's body odor.  Run it w/ or w/o an output file (defaults to STDOUT) and copy the results into the comments box.  Call it lame, call it what you will - I think it's sadder that output from this script can get past the filter (and it still hasn't been fixed yet).  Shout outs to Klerck and CmderTaco for (over)illustrating to us how shitty /code is...  Please go to CmderTaco's journal @ slashdot.org/~CmderTaco/journal for the VB version of this...