NAME Test2::Tools::JSON::Pointer - Compare parts of JSON string to data structure using JSON pointers VERSION VERSION version 0.02 SYNOPSIS use utf8; use Test2::V0; use Test2::Tools::JSON::Pointer; is( '{"a":"é¾"}', json '/a' => "é¾", ); is( '{"a":[1,2,3],"b":{"x":"y"}', json '/a' => [1,2,3], ); is( '{"a":[1,2,3],"b":{"x":"y"}', json '/b' => hash { field 'x' => 'y'; }, ); done_testing; with files: use Test2::V0; use Test2::Tools::JSON::Pointer; use Path::Tiny qw( path ); is( # will also work with Path::Class::File path('myjsonfile.json'), json '/a' => [1,2,3], ); done_testing; DESCRIPTION This module provides a comparison for a JSON string with a JSON pointer. This module was inspired by Test::Mojo, which provides a mechanism for checking the JSON response from a HTTP body. This module provides a generic way to write tests for JSON using a JSON pointer with or without the context of Mojolicious or HTTP. It also has a Test2::Suite style interface. This module expects a Perl string in Perl's internal representation (utf-8), NOT raw encoded bytes. Thus if you are reading files they need to be read in with the appropriate encoding. If you are testing against the content of a HTTP::Response object you want to use decoded_content. FUNCTIONS json is( $json, json($pointer, $check) ); is( $json, json($check), ); Compare $json to the given Test2::Suite $check after decoding the string into a deep reference (array or hash) and starting at the position of the given $pointer. If $json is an instance of Path::Tiny or Path::Class::File, then it will read from that file first to get the JSON. SEE ALSO Test2::Tools::JSON Provides a similar check without JSON pointers. Test::Deep::JSON Provides a similar check in a Test::Deep context. Test::Mojo Among many other capabilities, this great testing library allows you to make checks against JSON on an HTTP response object with JSON pointers. AUTHOR Graham Ollis <plicease@cpan.org> COPYRIGHT AND LICENSE This software is copyright (c) 2018 by Graham Ollis. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.