Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

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.


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

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: poem [id://98008]
Approved by root
[marto]: https://www. v=WZnsHvEYEZI
[Discipulus]: marto apotropaic gestures in Eataly..
[Discipulus]: LanX nick does not downvote peoples, just content he dislike (I think)
[Discipulus]: anyway I have my Tk toys running at 50%!! someone want to see it?
[LanX]: disc+ true every node authored by me or mentioning Perl 6 ;)
[Discipulus]: naahh..
[LanX]: oh a tunnel ...
LanX ducks!

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (7)
As of 2018-04-26 10:27 GMT
Find Nodes?
    Voting Booth?