ベンチマーク取ろうと思ってコード書いてたら、以下のような



$VAR1 = {
'bar' => [
'a',
'b',
{
'poop' => 'Poop'
}
],
'0' => 1,
'arg' => {
'doo' => 'daa'
},
'foo' => 1,
'2' => undef
};

これを



use JSON::PC;
my $j = JSON::PC->new;
$j->parse($j->convert(\%data));

すると



Bad string at /Library/Perl/5.8.6/darwin-thread-multi-2level/JSON/PC.pm line 32.



微妙・・・