Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
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!

Replies are listed 'Best First'.
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

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

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?
[thezip]: How goes it, Corion?
[Corion]: thezip: Quite good, after a one week vacation in the sun ;)
[Corion]: I hope you're well too!
[thezip]: Where did you go? We've already set a record for all-time February rainfall here.

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (8)
As of 2017-02-23 16:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Before electricity was invented, what was the Electric Eel called?






    Results (349 votes). Check out past polls.