Home
last modified time | relevance | path

Searched refs:decode_json (Results 1 – 9 of 9) sorted by relevance

/openbsd/src/gnu/usr.bin/perl/cpan/JSON-PP/t/
D003_types.t36 ok ('[1,2,3,4]' eq encode_json decode_json ('[1,2, 3,4]'));
37 ok ('[{},[],[],{}]' eq encode_json decode_json ('[{},[], [ ] ,{ }]'));
39 ok ('{"1":2,"3":4}' eq JSON::PP->new->canonical (1)->encode (decode_json '{ "1" : 2, "3" : 4 }'));
40 ok ('{"1":2,"3":1.2}' eq JSON::PP->new->canonical (1)->encode (decode_json '{ "1" : 2, "3" : 1.2 }'…
59 ok ($v == ((decode_json "[$v]")->[0]));
60 ok ($v == ((decode_json encode_json [$v])->[0]));
63 ok (30123 == ((decode_json encode_json [30123])->[0]));
64 ok (32123 == ((decode_json encode_json [32123])->[0]));
65 ok (32456 == ((decode_json encode_json [32456])->[0]));
66 ok (32789 == ((decode_json encode_json [32789])->[0]));
[all …]
Drt_116998_wrong_character_offset.t9 eval { decode_json(qq({"foo":{"bar":42})) };
13 eval { decode_json(qq(["foo",{"bar":42})) };
17 eval { decode_json(qq(["foo",{"bar":42}"])) };
21 eval { decode_json(qq({"foo":{"bar":42}"})) };
D002_error.t48 eval { decode_json ("\"\xa0") }; ok $@ =~ /malformed.*character/;
49 eval { decode_json ("\"\xa0\"") }; ok $@ =~ /malformed.*character/;
51 eval { decode_json ("1\x01") }; ok $@ =~ /garbage after/;
52 eval { decode_json ("1\x00") }; ok $@ =~ /garbage after/;
53 eval { decode_json ("\"\"\x00") }; ok $@ =~ /garbage after/;
54 eval { decode_json ("[]\x00") }; ok $@ =~ /garbage after/;
D099_binary.pl25 ok ($_[0] eq ((decode_json $js)->[0]), " - 0");
30 ok ($_[0] eq ((decode_json $js)->[0]), " - 2");
/openbsd/src/regress/lib/libcrypto/x509/bettertls/scripts/
Dconvert.perl28 my $stuff = decode_json($json);
/openbsd/src/regress/lib/libcrypto/wycheproof/
Dwycheproof-json.pl26 $tv = JSON::PP::decode_json(join "\n", @json);
/openbsd/src/gnu/usr.bin/perl/cpan/CPAN-Meta/t/parse-cpan-meta/
D02_api.t198 sub decode_json { JSON::PP::decode_json(@_) } }
/openbsd/src/gnu/usr.bin/perl/Porting/
Dbench.pl973 my $hash = JSON::PP::decode_json($data);
/openbsd/src/gnu/usr.bin/perl/cpan/JSON-PP/lib/JSON/
DPP.pm115 sub decode_json { # decode subroutine