use Test::Most;
use JSON::Path;
# Test demonstrating RT 122493, "Changed behavior - get() returns an array with a single, undef element when no results are found"
# https://rt.cpan.org/Ticket/Display.html?id=122493
my $orig = { bar => 1 };
my $p = JSON::Path->new("\$foo");
my $res = $p->get($orig);
is_deeply ( $orig, { bar => 1 }, "hashref is unchanged");
done_testing();