Re: Hash Keys case independent

You can not do it with a simple hash. However, a tied hash may have whatever qualities you desire.

There are the following modules on CPAN that might be helpful:

Tie::Hash::Approx - Match keys with with approximate strings.
Tie::Hash::Regex - Match keys using a regex (this may work for case insensitivity)
Hash::Case - Base class for hashes with casing requirements.
Hash::Case::Lower - Force all keys to lower case.
Hash::Case::Upper - Force all keys to upper case.
Tie::Hash - Base class providing a framework for you to use in deriving your own tied hash.

Personally I would probably start with Tie::Hash, and create your own case-insensitive hash starting with that framework. tie and perltie will contain additional info on the details of tieing hashes.

Update: Fixed a few module names. Thanks Limbic~Region.

Dave

Comment on Re: Hash Keys case independent

Replies are listed 'Best First'.
Re: Re: Hash Keys case independent by Not_a_Number (Prior) on May 04, 2004 at 19:31 UTC
You can not do it with a simple hash. Yes you can. However, that does not mean that you should :-) `my %h = ( 'aDobe' => 'abcd', 'big boss' => 'gcd', 'ADOBe' => 'abcd2' ) +; my $str = 'AdOBE'; for ( keys %h ) { print "$h{$_}\n" if lc $_ eq lc $str; }` [download]	[reply] [d/l]