json - Perl言語でJSONをデコードするには?

Question

Perl言語でJSONをデコードするには?

私の試み：

 #!/usr/bin/perl
use LWP::Simple;
$web_source = get('https://api.twitter.com/1.1/search/tweets.json');
$decoded_json = decode_json($web_source);
print $decoded_json;

エラー：

未定義のサブルーチン &main::decode_json が api.pl の 4 行目で呼び出されました。

これを修正する方法は？

Answer 1

use JSON;

ただし、アクセスしようとしている URL が認証を必要としていることがわかっていることを願っています。

Answer 2

perlでこのようにjsonをデコードできます

#!/usr/bin/perl
    use JSON;
    use Data::Dumper;

    $json = '{"a":1,"b":2,"c":3,"d":4,"e":5}';

    $text = decode_json($json);
    print  Dumper($text);