Select Code to Download

# correspondance map between a month name and his number
use constant MONTH => { jan => 1,
...
            oct => 10,
            nov => 11,
            dec => 12 };

   my %reverse_month = reverse %{[ MONTH ]}  # WRONG