File Coverage

blib/lib/Crypt/RSA/Parse/Private.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 17 17 100.0


line stmt bran cond sub pod time code
1             package Crypt::RSA::Parse::Private;
2              
3 2     2   19 use parent qw(Crypt::RSA::Parse::KeyBase);
  2         3  
  2         11  
4              
5 2     2   153 use parent qw(Class::Accessor::Fast);
  2         4  
  2         8  
6              
7             BEGIN {
8 2     2   333 __PACKAGE__->mk_ro_accessors(
9             qw(
10             version
11             publicExponent
12             privateExponent
13             prime1
14             prime2
15             exponent1
16             exponent2
17             coefficient
18             )
19             );
20              
21 2         593 *E = \&publicExponent;
22 2         3 *D = \&privateExponent;
23              
24 2         10 *P = \&prime1;
25 2         4 *Q = \&prime2;
26              
27 2         3 *DP = \&exponent1;
28 2         4 *DQ = \&exponent2;
29              
30 2         44 *QINV = \&coefficient;
31             }
32              
33             1;