| line |
true |
false |
branch |
|
43
|
9 |
1 |
if (my $keybin = $self->keybin) { } |
|
60
|
20 |
2 |
if $algorithm |
|
87
|
7 |
23 |
if (scalar @value) |
|
89
|
4 |
3 |
unless shift @value |
|
99
|
7 |
24 |
if (scalar @value) |
|
101
|
4 |
3 |
unless shift @value |
|
111
|
7 |
12 |
if (scalar @value) |
|
113
|
4 |
3 |
unless shift @value |
|
130
|
3 |
95 |
unless (ref $self) |
|
132
|
1 |
2 |
$argn =~ /\D/ ? : |
|
135
|
43 |
52 |
unless defined $arg |
|
136
|
5 |
47 |
if uc $arg eq "MNEMONIC" |
|
143
|
16 |
24 |
unless scalar @value |
|
181
|
9 |
5 |
if (/^RSA/) { } |
|
|
2 |
3 |
elsif (/^DSA/) { } |
|
184
|
7 |
2 |
if (my $exp_length = unpack('C', $keybin)) { } |
|
210
|
1 |
45 |
if $self->{'algorithm'} == 1 |
|
261
|
39 |
10 |
if defined $val |
|
262
|
8 |
2 |
$key =~ /^\d/ ? : |