Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re[6]: How's your Perl?

by xmath (Hermit)
on Oct 28, 2003 at 18:27 UTC ( #302748=note: print w/ replies, xml ) Need Help??

in reply to Re: Re[4]: How's your Perl?
in thread How's your Perl?

ok, here's why:

initially at parse time a goto-expression is free of special cases, so goto &foo is just a goto-element with the ENTERSUB expression &foo as argument. Now, the "goto SUB" variation needs a subref ofcourse, and to accomplish this perl effectively puts a \ in front of the argument, turning goto &foo into goto \&foo. Now here comes the problem: it does this whenever the argument is an ENTERSUB, and forgets to check for the ampersand (!(o->op_flags & OPf_STACKED)), so goto +foo becomes goto \foo, which results in the strange error message (the +-prefix is already dropped at parse time, and is just to prevent the special-case handling for goto LABEL to be triggered)

Questions? :-)

Comment on Re[6]: How's your Perl?
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://302748]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (4)
As of 2015-10-10 18:56 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (257 votes), past polls