Re^6: Lost anonymous subs


laziness, impatience, and hubris
	PerlMonks

by kappa (Chaplain)

on Dec 10, 2004 at 15:27 UTC ( [id://413880]=note: print w/replies, xml )

Need Help??

I may sound annoying but what about this? The my is executed only once.

my (@abc, $m); 
for $m ( qw/a b c/ ) { 
    push @abc, \ $m;
}                      
print "$$_\n" for @abc;
[download]

--kap

Comment on Re^6: Lost anonymous subs Select or Download Code

Replies are listed 'Best First'.
Re^7: Lost anonymous subs by diotalevi (Canon) on Dec 10, 2004 at 16:20 UTC
Well... this gets into a feature of for() and stops being about my(). for is special in that it aliases the "a", "b", and "c" variables over $m during the loop so even though you didn't say `for my` the effect is the same. So there's a sort of implicit my() happening there anyway. What you'll notice though, is that if you used strict, the implicit my() won't take care of making sure that variable is declared so you'd still have an error unless you said it as `for my` or if the loop variable already existed outside the loop. At this point, however, you may just want to start reading the output of things like Devel::Peek::Dump, `perl -MO=Concise your_script.pl`, and reading pp_enteriter in pp_ctl.c.	[reply] [d/l] [select]
Re^8: Lost anonymous subs by kappa (Chaplain) on Dec 10, 2004 at 16:23 UTC
Gone there. Thanks. --kap	[reply]

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://413880]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others making s'mores by the fire in the courtyard of the Monastery: (2)

As of 2024-04-26 03:10 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found