| line |
true |
false |
branch |
|
31
|
0 |
0 |
unless open my $fh, '<:raw', $filename |
|
50
|
0 |
0 |
unless ($result->{'success'}) |
|
51
|
0 |
0 |
$result->{'status'} == 599 ? : |
|
60
|
0 |
1 |
unless -r $filename |
|
63
|
0 |
1 |
if (eval {
do {
require Config::Identity
}
}) { } |
|
65
|
0 |
0 |
unless $conf{'user'} |
|
68
|
0 |
1 |
unless open my $pauserc, '<', $filename |
|
72
|
0 |
2 |
if /BEGIN PGP MESSAGE/ |
|
74
|
0 |
2 |
if not length $_ or $_ =~ /^\s*#/ |
|
76
|
2 |
0 |
if (my($k, $v) = / ^ \s* (user|password) \s+ (.+?) \s* $ /x) |
|
77
|
0 |
2 |
if $conf{$k} |
|
82
|
0 |
1 |
unless $conf{'user'} |
|
83
|
0 |
1 |
unless $conf{'password'} |