Help for this page
use strict; ... print "JAN: $JAN\n"; print "DEC: $DEC\n";
JAN: 0 Use of uninitialized value in concatenation (.) or string at P:\test37 +9.pl line 7. DEC: