http://qs1969.pair.com?node_id=871545


in reply to Re^2: Ignore Case when comparing Hash Keys
in thread Ignore Case when comparing Hash Keys

avoidcoder:

I don't advise it, but you could do something like:

%hash1 = ("John", 43, "Paul", 25, "Marie", 22); %hash2 = ("john", 43, "Paul", 25, "marie", 22); while (($KEY_2, $VALUE_2) = each %hash2){ if (grep { m/$KEY_2/i } keys %hash1) { print "$KEY_2 : Matched\n"; } else{ print "$KEY_2 : Did not match\n"; } }

Note: Untested, you can keep all the bits when it breaks, etc.

...roboticus