Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

early morning vent

by silent11 (Vicar)
on May 17, 2002 at 10:01 UTC ( [id://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

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
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?Last hourOther CB clients
Other Users?
Others goofing around in the Monastery: (2)
As of 2024-04-24 23:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found