Help for this page

Select Code to Download

Select or download this

my @months=qw/JAN FEB MAR APR MAY JUN JUL AUG SEP OCT NOV DEC/;
my %whatever;
$whatever{$_}=0 for @months;

Select or download this
```
@whatever{@months}=(0) x @months;
```