use JSON qw(from_json);
use File::Slurp qw(slurp);

my $hash = from_json( ~~slurp('test.json') );
print $hash->{MONTH};