|
219
|
1 |
1 |
0 |
$self->{'_jwt_maker'} ||= do {
my $class;
if ($self->{'_acme_key'}->isa('Crypt::Perl::RSA::PrivateKey')) {
$class = 'Net::ACME2::JWTMaker::RSA';
}
elsif ($self->{'_acme_key'}->isa('Crypt::Perl::ECDSA::PrivateKey')) {
$class = 'Net::ACME2::JWTMaker::ECC';
}
else {
die 'Net::ACME2::X'->create('Generic', "Unrecognized key type: $self->{'_acme_key'}");
} ;
unless ($class->can('new')) {
require Module::Load;
&Module::Load::load($class);
} ;
$class->new('key', $self->{'_acme_key'}, 'format', $self->{'_jws_format'})
} |