Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Definition

by TwistedRaisin (Novice)
on May 01, 2006 at 19:07 UTC ( #546732=poem: print w/ replies, xml ) Need Help??

if ($i) { while ($i) { die(); } } do { my $last_thought && sleep($quietly); } until $i #am ne #quid nimis 'sad'; $i; #have defined($me);

Replies are listed 'Best First'.
Re: Definition
by jesuashok (Curate) on May 02, 2006 at 02:44 UTC
    Hi

    Condition which you have added

    if ($i) { while ($i) { die(); } }
    if $i eq 'sad' or 'happy' or whatever feelings, as per the condition, which you have written you will die, My first change wold be
    @unhappy_events = ( add all unhappy events according to you ) if ( grep(/$i,@unhappy_events) ) { while ($i) { die(); } }

    If you change the poetry as per the condition, which I wrote, then obviously you will have to change the rest of lines.

    I appreciate your good effort. because, your first writeup in my great perl monk's group is a poem.

    "Keep pouring your ideas"
Re: Definition
by jesuashok (Curate) on May 02, 2006 at 02:59 UTC
    Hi

    I found this same poem in twistedraisin

    "Keep pouring your ideas"
      Indeed, that is me.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (4)
As of 2016-08-28 20:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    The best thing I ever won in a lottery was:















    Results (395 votes). Check out past polls.