f' }; my $pson = obj2pson( $data ); my $obj = pson2obj( $pson ); =head1 DESCRIPTION Like L<JSON> but use Dumper. =head1 METHOD =head2 obj2pson( $object ) get pson data. =head2 pson2obj( $ps