Mojo::JSON 轻型JSON模块

配合Mojo::UserAgent 使用起来，解析提供JSON的非常方便。也可以单独使用。

语法:

  use Mojo::JSON;

  my $json  = Mojo::JSON->new;
  my $bytes = $json->encode({foo => [1, 2], bar => 'hello!'});
  my $hash  = $json->decode($bytes);

Mojo::JSON 是最快的纯Perl解析JSON模块，但是你不能使用它来校验。 支持变量，数组，索引，hash 索引。

  [1, -2, 3]     -> [1, -2, 3]
  {"foo": "bar"} -> {foo => 'bar'}

方法：

decode

my $array = $json->decode($bytes);
my $hash  = $json->decode($bytes);

decode 成数组 或hash结构

encode

my $bytes = $json->encode({foo => 'bar'});

encode perl 的数据结构

转载于:https://www.cnblogs.com/tjxwg/archive/2013/02/13/2910857.html