use Data::UUID;
use Moo;
use Plack::Request;
use Plack::Session;
use URI;
use LWP::UserAgent;
use JSON;
use Crypt::JWT;
use MIME::Base64;
use Digest::SHA;
use Try::Tiny;
our $VERSION = "0.014";
with
=> 1
);
# internal (non overwritable) moo attributes
has json => (
is => "ro",
lazy => 1,
default => sub {
JSON->new->utf8(1);
},
init_arg => undef
);
has ua =>
azy",
init_arg => undef
);
has jwks => (
is => "lazy",
init_arg => undef
);
sub get_json {
my ($self, $url) = @_;
my $res = $self->ua->get($url);
if ( $res->code ne "200"