Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re: Hash of Hash of Listed subroutines

by ihb (Deacon)
on Jan 10, 2003 at 01:27 UTC ( [id://225708]=note: print w/replies, xml ) Need Help??


in reply to Hash of Hash of Listed subroutines

Since answers to your question have been given already I just felt like writing the test code without a lot of extra variables, just because I love map: $_->() for map @$_, values %HoL; If you don't want all values, and/or want the subroutines in order, you can do: $_->() for map @$_, @HoL{qw/ one two /}; I don't know if it's more readable, but personally I find it more concise and more straight to the point than nestled for loop with extra and only once used variables.

If you want the return values from the callbacks it gets extra nifty: @ret = map $_->(), map @$_, @HoL{qw/ one two /}; I also want to warn about dereferencing the callback without parentheses, as often seen when using the & to dereference it. It doesn't do what you think, and the issue is covered in perlfaq7, "What's the difference between calling a function as &foo and foo()?".

Looking at the code again though, I noticed that you do (\&hello, \&goodbye,) There's nothing wrong with that, but I figured you'd perhaps be glad to know that you can use the dangerously-looking \(&hello, &goodbye,) instead to save yourself a couple of backslashes. No, the subroutines does not get called. \(...) is quite special. Be sure to check it out in perlref (perlop will just point you there anyway).

Cheers,
ihb

PS. Yes, I love map. :)

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others pondering the Monastery: (3)
As of 2024-04-24 19:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found