The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# This is a test for a false syntax error produced by this module on
# legitimate input.

use warnings;
use strict;
use FindBin;
use Test::More;
use JSON::Parse 'json_file_to_perl';
eval {
    my $json = json_file_to_perl ("$FindBin::Bin/syntax-error-1.json");
};
note ($@);
ok (! $@);
done_testing ();