Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Star light / star bright.

by theorbtwo (Prior)
on Mar 04, 2003 at 09:55 UTC ( #240281=poem: print w/replies, xml ) Need Help??

#!/usr/bin/perl -w $star->{light}++; $star->{bright}++; $me->{seen_tonight}[0]=$star; $me->$_('wish') foreach qw(may might); $me->wish(upon => $star, outcome => 'grant', when => 'tonight'); '???';

Try running it, and ponder it's deeper meaning.


Warning: Unless otherwise stated, code is untested. Do not use without understanding. Code is posted in the hopes it is useful, but without warranty. All copyrights are relinquished into the public domain unless otherwise stated. I am not an angel. I am capable of error, and err on a fairly regular basis. If I made a mistake, please let me know (such as by replying to this node).

Replies are listed 'Best First'.
Re: Star light / star bright.
by mowgli (Friar) on Mar 04, 2003 at 12:43 UTC
    $ ./starbright.pl
    Useless use of a constant in void context at ./starbright.pl line 7.
    Can't call method "may" on unblessed reference at ./starbright.pl line 5.
    $
    

    Mmmmmm... my life seems to be full of useless and/or unblessed things lately.

    --
    mowgli

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (7)
As of 2021-06-15 08:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    What does the "s" stand for in "perls"? (Whence perls)












    Results (68 votes). Check out past polls.

    Notices?