my %months;
@months{	'01'..'12', 
			'1'..'12', 
		qw/ jan feb mar apr may jun
			jul aug sep oct nov dec
		/ } = ( qw/ 
			January February March April May June July
			August September October November December
		/) x 3;