2013-07-09 6 views
0

Принятый ответ "How to convert Perl objects into JSON and vice versa" говорит, что преобразование волосатое.Deserializing JSON для благословенного объекта

Кто-нибудь действительно использует JSON для десериализации вложенных благословенных объектов? Как?

+2

У вас есть конкретный пример? Каково ваше определение «Благословение» в контексте «R». – dickoa

+0

@ dickoa: не 'R'! 'Perl'! – sds

+0

Когда я прокомментировал этот вопрос, в этом вопросе был тэг 'r', а не тег' perl'. Я был смущен, но теперь все имеет смысл (вы его исправили). – dickoa

ответ

0

Использование 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"}}}} 
+0

JSYNC не выглядит достаточно стабильным (даже в ubuntu!) – sds

+0

У вас странное определение стабильности. – daxim

+0

Странно или нет - я отказался от cpan, и мне нужен мой код для работы с Ubuntu и CentOS, поэтому вещи, которые не могут быть установлены с aptitude и yum, недоступны. – sds