'br}
'br}
{\
json_pp - JSON::PP command utility
json_pp [-v] [-f from_format] [-t to_format] [-json_opt options_to_json]
json_pp converts between some input and output formats (one of them is s-1JSONs0). This program was copied from json_xs and modified.
The default input format is json and the default output format is json with pretty option.
-f from_format
Reads a data in the given format from s-1STDIN.s0
Format types:
as s-1JSONs0
Writes a data in the given format to s-1STDOUT.s0
no action.
as s-1JSONs0
options to s-1JSON::PPs0
Acceptable options are:
ascii latin1 utf8 pretty indent space_before space_after relaxed canonical allow_nonref allow_singlequote allow_barekey allow_bignum loose escape_slash
Verbose option, but currently no action in fact.
$ perl -e*(Aqprint q|{"foo":"XX","bar":1234567890000000000000000}|*(Aq |e json_pp -f json -t dumper -json_opt pretty,utf8,allow_bignum
$VAR1 = { *(Aqbar*(Aq => bless( { *(Aqvalue*(Aq => [ *(Aq0000000*(Aq, *(Aq0000000*(Aq, *(Aq5678900*(Aq, *(Aq1234*(Aq ], *(Aqsign*(Aq => *(Aq+*(Aq }, *(AqMath::BigInt*(Aq ), *(Aqfoo*(Aq => "ex{3042}ex{3044}" };
$ perl -e*(Aqprint q|{"foo":"XX","bar":1234567890000000000000000}|*(Aq |e json_pp -f json -t dumper -json_opt pretty
$VAR1 = { *(Aqbar*(Aq => *(Aq1234567890000000000000000*(Aq, *(Aqfoo*(Aq => "ex{e3}ex{81}ex{82}ex{e3}ex{81}ex{84}" };
Makamaka Hannyaharamitu, <makamaka[at]cpan.org>
Copyright 2010 by Makamaka Hannyaharamitu
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.