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

Object lesson

by tye (Sage)
on Nov 01, 2006 at 21:30 UTC ( #581766=poem: print w/ replies, xml ) Need Help??

#!/usr/bin/perl -l #line 2 "philosophy. fine" BEGIN { warn "your Perl is too naive" and exit if intelligence->isa("UNIVERSAL")} use less trucking; sub to'ship {package} package intelligence; ship to WalMart; die "you can't package intelligence" unless intelligence->isa("UNIVERSAL"); print "now we can all be smart"

The lesson is that, unlike people, only young Perls are not naive.1

- tye        

Comment on Object lesson
Select or Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (9)
As of 2015-11-26 10:17 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (697 votes), past polls