Re^2: Perl hash comparison

[hbm]

in reply to Re: Perl hash comparison
in thread Perl hash comparison

#my $matches;
#$matches += $key =~ /$1/i while $find =~ /(.)/g;

# or the "rolex" operator!
my $match =()= $key=~/[$find]/ig;

[Kenosis]

This is a good suggestion; I'll make the change in the script.