「PerlオブジェクトをJSONに、またはその逆に変換する方法」に対する受け入れられた回答は、変換が難しいと述べています。
ネストされた祝福されたオブジェクトの逆シリアル化に実際に JSON を使用する人はいますか? どのように?
「PerlオブジェクトをJSONに、またはその逆に変換する方法」に対する受け入れられた回答は、変換が難しいと述べています。
ネストされた祝福されたオブジェクトの逆シリアル化に実際に JSON を使用する人はいますか? どのように?
JSYNCを使用します。
perl -Moose=Foo -MJSYNC -e'
has "attr", is => "rw", isa => "HashRef[HashRef]", default => sub { { 0 => { 1 => { 3 => 4} } } };
print JSYNC::dump(Foo->new)
'
{"!":"!perl/hash:Foo","attr":{"0":{"1":{"3":"4"}}}}