changing the month hash to a list

This prints the incorrect month name because an array index starts at 0, not 1. This will fix it:

chomp(my $month = <STDIN> ); $month--;
[download]