Re^4: keys and values order on a hash


We don't bite newbies here... much
	PerlMonks

Re^4: keys and values order on a hash

by Somni (Friar)

on Jul 11, 2011 at 18:50 UTC ( [id://913751]=note: print w/replies, xml )

Need Help??

in reply to Re^3: keys and values order on a hash
in thread keys and values order on a hash

Indeed, you can insert a keys call prior to using 'each' in every instance, presuming you're not already in the middle of an 'each' on that hash already, and thereby reset the iterator mid-stream:

my %h = qw( one 1 two 2 three 3 four 4 );
while (my($k, $v) = each %h) {
    say "$k=$v";
    frobnicate(\%h);
}

sub frobnicate { keys %{ $_[0] } }
[download]

Admittedly, this example is a bit contrived, but it's generally unexpected that your loop becomes infinite just from simple calls that don't appear to modify the hash. The workaround is obvious, if restricting: don't pass the hashref to any functions (including functions with prototypes that auto-enreference it). It's even worse if the hash is global; you essentially can't call any functions, for fear that, somewhere in the call chain, something will call 'keys' on the hash.

In my opinion, it's too many caveats to make 'each' very useful.