Re^2: Perl hash comparison

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

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

Comment on Re^2: Perl hash comparison Download Code

Replies are listed 'Best First'.
Re^3: Perl hash comparison by Kenosis (Priest) on Aug 17, 2012 at 01:29 UTC
This is a good suggestion; I'll make the change in the script.	[reply]