Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re^3: Relative Merits of References

by pbeckingham (Parson)
on May 11, 2006 at 15:11 UTC ( #548739=note: print w/replies, xml ) Need Help??


in reply to Re^2: Relative Merits of References
in thread Relative Merits of References

Now you're making an expensive copy of a hash. You could just be using the references with:

my ($r1, $r2) = @_; ... print "$_ $h1{$_}\n" for keys %$r1; print "$_ $h2{$_}\n" for keys %$r2;

Update:Thanks again David, yes, I meant:

print "$_ $r1->{$_}\n" for keys %$r1; print "$_ $r2->{$_}\n" for keys %$r2;



pbeckingham - typist, perishable vertebrate.

Replies are listed 'Best First'.
Re^4: Relative Merits of References
by Hue-Bond (Priest) on May 11, 2006 at 15:34 UTC
    print "$_ $h1{$_}\n" for keys %$r1;

    ITYM $h1->{$_}.

    --
    David Serrano

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://548739]
help
Chatterbox?
holli just tried to open a soda bottle with a bottleopener
[holli]: ok, that doesn't *sound* that bad
[Corion]: holli: Was it a "twist-to-open" soda bottle? Or a German Mehrweg bottle with a twisty cap?

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (10)
As of 2017-09-25 12:30 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    During the recent solar eclipse, I:









    Results (280 votes). Check out past polls.

    Notices?