my $JAN = my $FEB = my $MAR .... my $DEC = 0;