File Coverage

blib/lib/Net/ACME2/JWTMaker/ECC.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Net::ACME2::JWTMaker::ECC;
2              
3 2     2   1381 use strict;
  2         5  
  2         64  
4 2     2   11 use warnings;
  2         5  
  2         66  
5              
6 2     2   12 use parent qw( Net::ACME2::JWTMaker );
  2         3  
  2         16  
7              
8             sub _ALG {
9 16     16   46 my ($self) = @_;
10              
11 16         97 return $self->{'key'}->get_jwa_alg();
12             }
13              
14             sub _get_signer {
15 16     16   59 my ($self) = @_;
16              
17             return sub {
18 16     16   92 return $self->{'key'}->sign_jwa(@_);
19 16         87 };
20             }
21              
22             1;