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


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

    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

    I found this same poem in twistedraisin

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

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: poem [id://546732]
Approved by jesuashok
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (6)
As of 2017-07-24 06:55 GMT
Find Nodes?
    Voting Booth?
    I came, I saw, I ...

    Results (348 votes). Check out past polls.