For a case insensitive hash, you could use a tied hash, but it's a lot easier to just always lowercase the keys. $hash{ lc $key }

2;0 juerd@ouranos:~$ perl -e'undef christmas'
Segmentation fault
2;139 juerd@ouranos:~$
[download]