Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

The nature of work

by tilly (Archbishop)
on Aug 28, 2000 at 16:25 UTC ( #29977=poem: print w/ replies, xml ) Need Help??

The job I want:
$dollars++ while sleep(1);
The job I get:
{ work(); redo; get_rich(); }
That's life!

Comment on The nature of work
Select or Download Code
RE: The nature of work
by t0mas (Priest) on Aug 28, 2000 at 18:21 UTC
    Poor tilly: That's life!

    $life = "hard";

    :)

    /brother t0mas
RE: The nature of work
by Mushy (Scribe) on Aug 29, 2000 at 01:48 UTC
    % cat life.pl #!/usr/bin/perl # life.pl use Reality; # from tilly while ($alive && !$rich) { $money = work(); $taxes = 30 + rand 20; $money -= $taxes; pay($taxes); } die "Empty handed."; __END__ % perl -c life.pl Warning: The value of $rich is always false. %

    - Mushy

      Good one!!!
      I wish I only paid 50$ in taxes tops.
        Nobody said the unit was USD! It could be something like "the average national income of a small developing country" (on second thought that is still not much -- and if it is negative you get a tax-refund).

        CountZero

        "If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (4)
As of 2014-07-26 02:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (175 votes), past polls