?????????? ????????? - ??????????????? - /home/.cpan/build/JSON-4.10-0/t/xe04_escape_slash.t
???????
use strict; use Test::More; BEGIN { plan tests => 3 }; BEGIN { $ENV{PERL_JSON_BACKEND} ||= 1; } use JSON -support_by_pp; SKIP: { skip "can't use JSON::XS.", 3, unless( JSON->backend->is_xs ); my $json = new JSON; is($json->escape_slash(0)->allow_nonref->encode("/"), '"/"'); is($json->escape_slash(1)->allow_nonref->encode("/"), '"\/"'); is($json->escape_slash(0)->allow_nonref->encode("/"), '"/"'); } __END__
| ver. 1.6 |
Github
|
.
| PHP 8.2.30 | ??????????? ?????????: 0.02 |
proxy
|
phpinfo
|
???????????