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

First Poem

by jjdraco (Scribe)
on Oct 23, 2002 at 12:17 UTC ( #207366=poem: print w/replies, xml ) Need Help??

well, I'm not much of a poet, but I was just woken up from my sleep and it inspired me to at least attempt to try and write a poem, I don't know if it's worth posting but I thought I would give it a try. After all the worste that could happen is my node gets reapped, right.
package Alaska; use strict; use warnings; my $self = bed('asleep'); $self = woken('reason' => 'shook'); $self = why('Earthquake'); $self = inspired('write poem'); 1;
yup, earthquake. First one I've ever felt. It was a unique experiences. It was a very small one though, I just tried to go back to bed after words, but for some reason I wanted to get on perlmonks and write a poem about it. damn, one more hour and I have to get up anyway :(

learning Perl one statement at a time.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2017-10-22 07:05 GMT
Find Nodes?
    Voting Booth?
    My fridge is mostly full of:

    Results (272 votes). Check out past polls.