use strict; use Test::More; BEGIN { plan tests => 1 }; BEGIN { $ENV{PERL_JSON_BACKEND} = 1; } use JSON; SKIP: { skip "can't use JSON::XS.", 1, unless( JSON->backend->is_xs ); ok(1, "load JSON::XS"); }