in reply to get a reverse of a constant hash

To reverse a hash from your constant do: 
my %reverse_month = reverse %{MONTH()};

[download]
Boris

In Section Seekers of Perl Wisdom