1 2use Test::More; 3use strict; 4BEGIN { plan tests => 2 }; 5BEGIN { $ENV{PERL_JSON_BACKEND} = 0; } 6use JSON; 7######################### 8 9my $json = JSON->new; 10 11my $js = 'abc'; 12 13 14is(to_json($js, {allow_nonref => 1}), '"abc"'); 15 16is(from_json('"abc"', {allow_nonref => 1}), 'abc'); 17 18