| line |
true |
false |
branch |
|
32
|
0 |
3 |
unless my $filepath = shift() |
|
43
|
2 |
1 |
if (-e $self->filepath) { } |
|
67
|
0 |
2 |
unless $filepath |
|
84
|
0 |
2 |
if not $info or ref $info ne 'HASH' |
|
87
|
0 |
2 |
unless $version and $version =~ /^\d+$/ |
|
88
|
0 |
2 |
if $FILE_VERSION < $version |
|
90
|
0 |
2 |
if ref $info->{'keys'} ne 'HASH' |
|
92
|
0 |
2 |
if $info->{'secret'} and not %{$info->{'keys'};} |
|
105
|
0 |
0 |
unless my $public_key = shift() |
|
106
|
0 |
0 |
@_ == 1 ? : |
|
120
|
0 |
0 |
if ($args->{'embed'}) |
|
121
|
0 |
0 |
unless open my $fh, '<', $public_key |
|
128
|
0 |
0 |
if ($self->secret) |
|
134
|
0 |
0 |
wantarray ? : |
|
147
|
0 |
0 |
@_ == 1 ? : |
|
149
|
0 |
0 |
unless $args->{'passphrase'} or $args->{'private_key'} |
|
152
|
0 |
0 |
unless $passphrase |
|
161
|
0 |
0 |
unless my $private_key = shift() |
|
163
|
0 |
0 |
unless -e $private_key and not -d $private_key |
|
169
|
0 |
0 |
if (my $key = $keys->{$fingerprint}) |
|
179
|
0 |
0 |
unless my $secret = shift() |
|
180
|
0 |
0 |
unless my $passphrase = shift() |
|
189
|
0 |
0 |
unless my $passphrase = shift() |
|
193
|
0 |
0 |
unless my $pubkey = $self->find_public_key($key) |
|
202
|
0 |
0 |
unless my $key = shift() |
|
204
|
0 |
0 |
if ($key->{'content'}) { } |
|
215
|
0 |
0 |
if -e $filepath and not -d $filepath |
|
223
|
0 |
0 |
unless my $key = shift() |
|
225
|
0 |
0 |
unless my $fingerprint = $key->{'fingerprint'} |
|
228
|
0 |
0 |
if ($fingerprint =~ /^[A-Fa-f0-9]{32}$/) { } |
|
|
0 |
0 |
elsif ($fingerprint =~ m[^[A-Za-z0-9/\+]{27}$]) { } |
|
|
0 |
0 |
elsif ($fingerprint =~ m[^[A-Za-z0-9/\+]{43}$]) { } |