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

Re^2: map-like hash iterator

by ikegami (Pope)
on Mar 26, 2010 at 23:11 UTC ( #831294=note: print w/replies, xml ) Need Help??


in reply to Re: map-like hash iterator
in thread map-like hash iterator

One further note: this uses the package variables $a and $b to communicate the current key and value to the callback. Therefore, this code must be included (e.g. via "require") in each and every namespace where you want to use it.

No, not good enough. The package used is the package in which the source code was found.

Fix:

sub hasheesh(&\%) { my( $c, $h ) = @_; local( $a, $b ); { no strict 'refs'; *{caller().'::a'} = \$a; *{caller().'::b'} = \$b; } ...rest... }

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://831294]
help
Chatterbox?
[choroba]: talking about golfing, I did Pascal's triangle in 51 characters ;-)
[choroba]: and 99 bottles of beer in 217

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (6)
As of 2017-10-22 20:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (275 votes). Check out past polls.

    Notices?