$ perl -E 'use JSON; my $j = do { local $/; <> }; my $p = decode_json $j; say $p->{def}[0]' pm_1201279_input.json
HASH(0x7f89ee002e30)