Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

early morning vent

by silent11 (Vicar)
on May 17, 2002 at 10:01 UTC ( #167256=poem: print w/ replies, xml ) Need Help??

#!/usr/bin/perl use Merger::Success qw(Fiorina Capellas); require employment; print "Who's your daddy?"; my $employer = <STDIN>; if ( $employer =~ /compaq/i ) { my $life = "ok"; sleep(8/24); } else { my ($life, $family_time) = 0; my $work_load++ and my $SLA = 24*7; sleep(0); our $layoffs > 10000; open(WINDOW,"and.jump") unless my $job = new employment; }
-Silent11

Comment on early morning vent
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: poem [id://167256]
Approved by crazyinsomniac
Front-paged by andye
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (7)
As of 2014-09-17 20:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (99 votes), past polls