# simple literal key only
$month = $months{$month} if exists $month{$month};

# more flexible any instance
my $re = join '|', map{quotemeta} keys %months;
$month =~ s/($re)/$months{$1}/g;