json
こんな感じで取れる。
use JSON::Syck; my $hoge = { hoge => 'aaaaa', test => [ qw(aaaa bbbb) ], } warn JSON::Syck::Dump($hoge);
{"test":["aaa","bbb"],"hoge":"aaaaa"}
http://search.cpan.org/~audreyt/YAML-Syck-0.72/lib/JSON/Syck.pm
こんな感じで取れる。
use JSON::Syck; my $hoge = { hoge => 'aaaaa', test => [ qw(aaaa bbbb) ], } warn JSON::Syck::Dump($hoge);
{"test":["aaa","bbb"],"hoge":"aaaaa"}
http://search.cpan.org/~audreyt/YAML-Syck-0.72/lib/JSON/Syck.pm