Help for this page
use strict; use warnings; ... for (keys %hash2) { if (exists $hash1a{lc $_}) { print "matches\n";} }
matches