blob: 4409ce13e22eb805384308b9a454e7047b5dd6b5 (
plain)
1
2
3
4
5
6
7
8
9
|
# copied over from JSON::XS and modified to use JSON
BEGIN { $| = 1; print "1..1\n"; }
END {print "not ok 1\n" unless $loaded;}
BEGIN { $ENV{PERL_JSON_BACKEND} ||= "JSON::backportPP"; }
use JSON;
$loaded = 1;
print "ok 1\n";
|