Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

JAPH with AUTOLOAD

by sh1tn (Priest)
on Feb 04, 2008 at 19:20 UTC ( [id://666056]=obfuscated: print w/replies, xml ) Need Help??

#!/usr/bin/perl Just->Another->Perl->Hacker; package Just; INIT { print __PACKAGE__, ' ' } sub AUTOLOAD { bless [print+($AUTOLOAD=~/::(.+)/)[0], q/ /] } sub DESTROY {}

Replies are listed 'Best First'.
Re: JAPH with AUTOLOAD
by ambrus (Abbot) on Feb 05, 2008 at 09:03 UTC

    Nice. For a somewhat related japh, see pete's My JAPH.

    Update: clarified that the japh is not mine, the title was confusing.

      Yep, the example you're pointing to looks better.
      Primarily my goal was the visual effect.


Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: obfuscated [id://666056]
Approved by Corion
Front-paged by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others surveying the Monastery: (4)
As of 2024-03-29 01:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found