This way you don't need the @month_numbers-array at all and for my taste it it clearer.my %month; for my $language (keys %month_names) { my $n=0; $month{$_} = $month{uc $_} = $month{lc $_} = $n++ for @{$month_names +{$language}}; }
In reply to Re: Getting numeric month for comparisons
by morgon
in thread Getting numeric month for comparisons
by Lady_Aleena
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |