Tree - source-git/perl-JSON - CentOS Git server

Blob History Raw

Packit Service	639957
Packit Service	639957	`use strict;`
Packit Service	639957	`use Test::More;`
Packit Service	639957	`BEGIN { plan tests => 1 };`
Packit Service	639957
Packit Service	639957	`BEGIN { $ENV{PERL_JSON_BACKEND} \|\|= 1; }`
Packit Service	639957
Packit Service	639957	`use JSON;`
Packit Service	639957
Packit Service	639957	`SKIP: {`
Packit Service	639957	`skip "can't use JSON::XS.", 1, unless( JSON->backend->is_xs );`
Packit Service	639957	`diag("load JSON::XS v." . JSON->backend->VERSION );`
Packit Service	639957	`ok(1, "load JSON::XS v." . JSON->backend->VERSION );`
Packit Service	639957	`}`
Packit Service	639957