http://qs321.pair.com?node_id=374850

#!/usr/bin/perl # # after_the_vote.pl # # written for the unsuspecting staff, her her her her her... # commisioned by the men in the black heliochopjects # Mark Addinall # require ANCIENT_STRINE ; # dopey pricks couldn't even # speak proper Wirrayjuurray, # gindhaay, gwaangi barra-barra # buugas. ITS: time ; sleep ; sleep ; sleep ; tell name ; my @brain = ( is, coded, like, this ) ; my @mind = ( is, out ,of , control ) ; open( your, eyes ) ; while ( i, am, awake ) { I: print "Reams about that Mark \n" ; BETTER: warn "me about the gang of Che \n" ; BETTER ; BETTER ; THEY: print "Bad things about me they \n" ; do{ always } ; PLEASE: print "I will, I want to be the boss" \n" ; PLEASE; PLEASE; PLEASE; sub standard { unless $I_improve ; ( 0 ) wait ; ( 0 ) wait ; values %I_have_none ; study $hurts ; split ; } $and_run ; sub human { unless $I_get_better ; do { not warn "gawy" } ; hex gawy ; sleep gawy ; chop gawy ; kill gawy ; die gawy ; do { not warn "wisa" } ; hex wisa ; sleep wisa ; chop wisa ; kill wisa ; die wisa ; do { not warn "noddy" } ; hex noddy ; sleep noddy ; chop noddy ; kill noddy ; die noddy ; kill each %STANDING ; reset 'GUN' ; } cos $too_late ; close( your, eyes ) ; sleep ; sleep ; sleep ; } do { not sin } ; do { not sin } ; do { not wait } ; seek your, ending,, open ( your, eyes ) ; crypt( $close, $doors ) ; die ; pop ; die again ; pop ; pop ; die again ; pop ; pop ; pop ; CLICK: CLICK; CLICK; # Well that should do it # gotta get the SCCP cleared by great unka Tomato # then it's into the transmitter tower ;-) # EOF ( and the end of that pesky bunch of androids ) # mark.addinall@team.telstra.com