Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re: notabug quiz

by liz (Monsignor)
on Dec 12, 2003 at 08:42 UTC ( #314254=note: print w/replies, xml ) Need Help??

in reply to notabug quiz

sub Foo::INIT { print "Hello world\n" } &Foo::INIT;

I think I'm responsible for this one, more or less. For a while I was thinking that BEGIN, CHECK, INIT and END were actually subroutines. Well, they aren't. They're "magic" code blocks, that just happen to allow a "sub" prefix to confuse the hell out of everybody. Which is where the obfuscation In the BEGINning is based on.

Note that you can actually call subroutines named BEGIN, CHECK, INIT or END, but you need a special action to get them defined:

*Foo::INIT = sub { print "Hello world\n" }; &Foo::INIT; __END__ Hello world


Replies are listed 'Best First'.
Re: Re: notabug quiz
by ysth (Canon) on Dec 12, 2003 at 09:45 UTC
      Those magical codeblocks are detectable via caller EXPR though. This is a point in favour of subs in the "codeblocks vs. subs" dilemma.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://314254]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (9)
As of 2018-05-25 12:04 GMT
Find Nodes?
    Voting Booth?