1use strict; 2use warnings; 3use Test::More; 4 5BEGIN { plan tests => 1 }; 6 7BEGIN { $ENV{PERL_JSON_BACKEND} = 0; } 8 9use JSON::PP; 10 11{ #SKIP_UNLESS_PP 2.90,1 12 eval { JSON::PP->new->decode('{}0') }; 13 ok $@; 14} 15