http://qs321.pair.com?node_id=690898


in reply to Re: Common hash keys
in thread Common hash keys

There's no need to be careful if you handle the 0 case directly:

use List::Util; my $hasInt = defined first { exists $hashRef2->{$_} } keys %$hashRef1 ;

lodin