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