Yet Another CPAN Grep

Test-Deep-JWT ( A/AD/ADDSICT/Test-Deep-JWT-0.02.tar.gz, ADDSICT, 2015; MetaCPAN )

Test-Deep-JWT/lib/Test/Deep/JWT.pm ( view source; MetaCPAN )

p::JWT;
use 5.008005;
use strict;
use warnings;
use MIME::Base64 qw(decode_base64url);
use JSON qw(decode_json);
use Test::Deep ();
use Test::Deep::Cmp;
use Exporter qw(import);

our $VERSION = "0.02"

 $claims, $sig) = split /\./, $got;
        return (
            decode_json(decode_base64url($header)),
            decode_json(decode_base64url($claims))
        );
    };
    if (my $e = $@) {

<gt>

=head1 THANKS

This module is highly inspired from L<Test::Deep::JSON>.
The most part of implementation is borrowed from that module.

=head1 SEE ALSO

L<Test::Deep>

L<Test::Deep::JSON>

=cut