##########|###########
$everyday = "Yes, you must work everday!"; ############|############
PushYour: $Sisyphean{'Rock'} = $everyday; ##############| Green spring leaves dont break.
ComeOn: $today = $everyday; #but at least you write perl #############| Use CTRL-Z to end this
GoPushThatRock: while ($today){ #############/|\Frozen leaves dont grow..
##########/#|#\##########
You: push (@uphill, $Sisyphean{'Rock'}); #########/##|##\#########
InSpareTimeReadSome: print $About."@uphill Struggle!\n"; ######/###|###\######
YouMustNot: sleep 1; $SIG{'INT'}=sub{
warn $yourself.$everyday; #in case you forget ##/#####|#####\##
};}#####\#
next GoPushThatRock; ######|#######
#####|#####
####|####
##|##
#
Note: If you try break, it catches it; so it's better to stop (as per the haiku).
Update: Small Change in Title
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: best workday ever
by jagh (Monk) on Nov 29, 2007 at 14:18 UTC | |
|
Re: best workday ever
by tefflox (Initiate) on Dec 15, 2007 at 05:11 UTC | |
by rgiskard (Hermit) on Dec 16, 2007 at 14:11 UTC |