Re: Preventing unintended list expansion inside hash literals.

Select or download this

%$hash_ref or return;

Select or download this

%$hash_ref or return undef;

Select or download this

keys %$hash_ref; # reset iterator

Select or download this

18:30 >perl -MData::Dump -wE "sub f { return (17, 42); } my %h = ( key
+1 => (f())[0] // undef ); dd \%h;"
{ key1 => 17 }
...
{ key1 => undef }

18:30 >

Select Code to Download