#!/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