*Jsonモジュール [#a7e0dd22]
use JSON;
$obj = {
id => ["foo", "bar", { aa => 'bb'}],
hoge => 'boge'
};
$js = objToJson($obj);
# this is {"id":["foo","bar",{"aa":"bb"}],"hoge":"boge"}.
$obj = jsonToObj($js);
# the data structure was restored.
# OOP
my $json = new JSON;
$obj = {id => 'foo', method => 'echo', params => ['a','b']};
$js = $json->objToJson($obj);
$obj = $json->jsonToObj($js);
# pretty-printing
$js = $json->objToJson($obj, {pretty => 1, indent => 2});
$json = JSON->new(pretty => 1, delimiter => 0);
$json->objToJson($obj);
**参考 [#l96a5baf]
http://search.cpan.org/~makamaka/JSON-1.05/lib/JSON.pm