Re: notabug quiz

in reply to notabug quiz

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

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
[download]

Liz

Comment on Re: notabug quiz Select or Download Code

Replies are listed 'Best First'.
Re: Re: notabug quiz by ysth (Canon) on Dec 12, 2003 at 09:45 UTC
++Liz's documentation patch explaining the problem is at http://public.activestate.com/cgi-bin/perlbrowse?patch=21832. The improved documentation will be in 5.8.3 and 5.9.1.	[reply]
Re^3: notabug quiz by kappa (Chaplain) on Dec 10, 2004 at 12:25 UTC
Those magical codeblocks are detectable via `caller EXPR` though. This is a point in favour of subs in the "codeblocks vs. subs" dilemma. --kap	[reply] [d/l]

In Section Meditations