arrays - JSON オブジェクト値にアクセスする方法

Question

私はこれを持っていますprint STDERR Dumper $data:私はどのように私はそれを行うには、生地 にアクセスしたいですか? 試してみましたが、構文エラーが発生しました。
$VAR1 = '{
"url_date":null,
"footer":null,"id":"18",
"authors":[
{"initials":"B.","last_name":"Best","has":0,"id":12},
{"initials":"D.","last_name":"Dough","has":1,"id":10},
{"initials":"F.","last_name":"Fuss","has":0,"id":15,}
],
"url_headline":null,
"headline":"test"}';

print STDERR Dumper $data.authors[1].last_name

2回目の試行
use JSON::XS qw( decode_json );
my $coder = JSON::XS->new->utf8->pretty->allow_nonref;
my $p = $coder->decode ($.data);

Answer 1

あなたは文字列を持っています。文字列に含まれているのは、有効な JSON と有効な YAML です。JSON を解析する必要があります。これを行う最善の方法は、JSON::XSのような既存のパーサーを使用することです。

use JSON::XS qw( decode_json );
my $data = decode_json($data_json);
$data->{authors}[1]{last_name}

Answer 2

最善の方法は、最初にモジュールを使用して文字列を Perl ハッシュ参照にデコードしJSON、次に通常の Perl のハッシュ アクセス構文を使用すること$data->{"authors"}[1]{"last_name"}です。