| line |
true |
false |
branch |
|
40
|
2 |
1 |
if (-e $sig) |
|
43
|
0 |
2 |
unless open my $fh_sig, '<', $sig |
|
45
|
1 |
4 |
if (/^-----BEGIN PGP /) |
|
52
|
1 |
1 |
if ($is_openpgp_ascii_armor) |
|
58
|
0 |
1 |
unless (&find_command('gpg')) |
|
64
|
0 |
1 |
unless open my $fh_asc, '>', $asc |
|
66
|
0 |
1 |
unless open my $fh_gpg, '-|', 'gpg', @gpg_opts, '-o', '-', '--enarmor', $sig |
|
69
|
1 |
17 |
if $line =~ /^Version: / |
|
70
|
1 |
16 |
if $line =~ /^Comment: / |
|
77
|
0 |
1 |
unless close $fh_gpg |
|
78
|
0 |
1 |
unless close $fh_asc |
|
92
|
0 |
0 |
if (&find_command('gpg')) { } |
|
|
0 |
0 |
elsif ($opts{'require_valid_signature'}) { } |
|
113
|
0 |
0 |
if (WIFEXITED($?)) { } |
|
115
|
0 |
0 |
if $status |
|
116
|
0 |
0 |
if ($status == 1 or $status and $opts{'require_valid_signature'}) { } |
|
|
0 |
0 |
elsif ($status) { } |
|
132
|
0 |
0 |
if (&find_command('gpgv')) { } |
|
|
0 |
0 |
elsif (&find_command('gpg')) { } |
|
|
0 |
0 |
elsif ($opts{'require_valid_signature'}) { } |
|
152
|
0 |
0 |
if exists $opts{'datafile'} |
|
157
|
0 |
0 |
if (WIFEXITED($?)) { } |
|
159
|
0 |
0 |
if $status |
|
160
|
0 |
0 |
if ($status == 1 or $status and $opts{'require_valid_signature'}) { } |
|
|
0 |
0 |
elsif ($status) { } |