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

Perl idioms

by spacewarp (Pilgrim)
on Jul 19, 2001 at 13:05 UTC ( #98008=poem: print w/ replies, xml ) Need Help??

I was walking through the mall today, and I happened to spot a store selling Perl buttons! Check 'em out!
FLOGGINGS: { REDO until $morale_improves; } my $mess; { local $mess; GOD: bless $mess; } if ( $day !=~ /sunshine/ ) { $day = $night; } $whoever->laughs[-1] = "Slowest thinker"; if ( $you_can_read_this ) { $you = "Too Close!!"; } my $preference = "rich/stupid"; my $inner_child = "twisted little bastard"; no Expect::Spanish::Inquisition; $hand[1] = "different fingers";
Answers: {
The floggings will continue until morale improves!
God bless this mess.
A day without sunshine is like night.
Whoever laughs last thinks slowest.
If you can read this, you're Too Close!
I'd rather be rich than stupid.
My inner child is a twisted little bastard
Nobody expects the Spanish Inquisition!
On the other hand, there are different fingers.
}

Spacewarp

DISCLAIMER:
Use of this advanced computing technology does not imply an endorsement
of Western industrial civilization.

Comment on Perl idioms
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (3)
As of 2015-01-29 04:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My top resolution in 2015 is:

















    Results (228 votes), past polls