Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: how to get alias name of anonymous sub?

by ruoso (Curate)
on Nov 29, 2010 at 10:24 UTC ( #874220=note: print w/replies, xml ) Need Help??

in reply to how to get alias name of anonymous sub?

As noone seem to have pointed already, there's one important module on that subject which is Sub::Name. It should allow you to:

use Sub::Name foreach (keys %news_sites) { *{$_} = subname "generator_for_$_" => sub {...} }

But note that you seem to be missing one more important concept here, which is the concept of closures

foreach my $key (keys %news_sites) { *{$key} = sub { ... # as the $key variable was declared in the outer scope of the s +ubroutine, # if the code reference survives longer than this scope it will + retain its # value warn $key; # this will warn the value used when defining this s +ub. } }

Replies are listed 'Best First'.
Re^2: how to get alias name of anonymous sub?
by gian (Novice) on Nov 29, 2010 at 16:49 UTC
    I really missed the closures.Thanks for your remind.I heard the concept of closures before,but I could't find the usage of it in perl , so i did't understand it very much . I think this a good example for me.Thanks ruoso.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (1)
As of 2023-03-31 02:34 GMT
Find Nodes?
    Voting Booth?
    Which type of climate do you prefer to live in?

    Results (74 votes). Check out past polls.