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   13 use parent qw(Crypt::RSA::Parse::KeyBase);
  2         4  
  2         9  
4              
5 2     2   108 use parent qw(Class::Accessor::Fast);
  2         4  
  2         6  
6              
7             BEGIN {
8 2     2   252 __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         2432 *E = \&publicExponent;
22 2         4 *D = \&privateExponent;
23              
24 2         5 *P = \&prime1;
25 2         3 *Q = \&prime2;
26              
27 2         3 *DP = \&exponent1;
28 2         4 *DQ = \&exponent2;
29              
30 2         47 *QINV = \&coefficient;
31             }
32              
33             1;