use v5.014; use JSON; use Mojo::JSON::Pointer; # reconstructing a JSON response from your Dump my $json = to_json( get_response() ); # your client request gets this # converting your API response to a Perl struct my $data = from_json( $json ); # your client should provide this # converting the elements to JSON pointer paths my @elements = map {s!\.!/!gr} (qw/ userName displayName meta.created /); for my $item ( @{ $data->{Resources} } ) { my $pointer = Mojo::JSON::Pointer->new( $item ); foreach my $element (@elements) { say "$element: " . $pointer->get('/' . $element); } say ''; } sub get_response { return { 'Resources' => [{ 'displayName' => 'User 1', 'userName' => 'user1@test.com', 'id' => '1234567', 'meta' => { 'created' => '2018-04-16T11:57:19.376Z' } }, { 'displayName' => 'User 2', 'userName' => 'user2@test.com', 'id' => '1234568', 'meta' => { 'created' => '2018-04-16T11:59:27.111Z' } }, { 'displayName' => 'User 3', 'userName' => 'user3@test.com', 'id' => '12345679', 'meta' => { 'created' => '2018-11-21T14:49:33.821Z' } }, ], 'totalResults' => 3, 'itemsPerPage' => 50, 'startIndex' => 1, 'schemas' => [ 'urn:ietf:params:scim:api:messages:2.0:ListResponse' ] }; } __END__ #### perl 1226873.pl userName: user1@test.com displayName: User 1 meta/created: 2018-04-16T11:57:19.376Z userName: user2@test.com displayName: User 2 meta/created: 2018-04-16T11:59:27.111Z userName: user3@test.com displayName: User 3 meta/created: 2018-11-21T14:49:33.821Z