| line |
true |
false |
branch |
|
41
|
0 |
1 |
unless open my $fh_asc, '>', $asc |
|
43
|
0 |
1 |
unless open my $fh_gpg, '-|', 'gpg', @gpg_opts, '-o', '-', '--enarmor', $sig |
|
46
|
1 |
17 |
if $line =~ /^Version: / |
|
47
|
1 |
16 |
if $line =~ /^Comment: / |
|
54
|
0 |
1 |
unless close $fh_gpg |
|
55
|
0 |
1 |
unless close $fh_asc |
|
64
|
2 |
1 |
if (-e $sig) |
|
67
|
0 |
2 |
unless open my $fh_sig, '<', $sig |
|
69
|
1 |
4 |
if (/^-----BEGIN PGP /) |
|
76
|
1 |
1 |
if ($is_openpgp_ascii_armor) |
|
82
|
1 |
0 |
if (&find_command('gpg')) { } |
|
98
|
0 |
0 |
if (&find_command('gpg')) { } |
|
|
0 |
0 |
elsif ($opts{'require_valid_signature'}) { } |
|
119
|
0 |
0 |
if (WIFEXITED($?)) { } |
|
121
|
0 |
0 |
if $status |
|
122
|
0 |
0 |
if ($status == 1 or $status and $opts{'require_valid_signature'}) { } |
|
|
0 |
0 |
elsif ($status) { } |
|
138
|
0 |
0 |
if (&find_command('gpgv')) { } |
|
|
0 |
0 |
elsif (&find_command('gpg')) { } |
|
|
0 |
0 |
elsif ($opts{'require_valid_signature'}) { } |
|
158
|
0 |
0 |
if exists $opts{'datafile'} |
|
163
|
0 |
0 |
if (WIFEXITED($?)) { } |
|
165
|
0 |
0 |
if $status |
|
166
|
0 |
0 |
if ($status == 1 or $status and $opts{'require_valid_signature'}) { } |
|
|
0 |
0 |
elsif ($status) { } |