perl - Perl を使用してキー - 値ベースの辞書を解析する方法

Question

Perl を使用して、API 呼び出しからkey-valueベースの辞書を取得します。

use strict;
use warnings;

use LWP::Simple;
my $url = "http://example.com/?id=124341";
my $content = get($url);
$content =~ s/ /%20/g;
print $content;


{"id":"85710","name":"jack","friends":["james","sam","Michael","charlie"]}

以下のように結果を得るためにそれを解析するにはどうすればよいですか?

name : jack
hist friend list :
james
sam
Michael
charlie

ありがとう！

Answer 1

use JSON; # imports encode_json, decode_json, to_json and from_json.


my $href  = decode_json($content);

use Data::Dumper; print Dumper $href;