line |
true |
false |
branch |
122
|
0 |
0 |
unless open my $fh, '<', $filename |
136
|
0 |
16 |
unless $value |
138
|
6 |
10 |
if ($value =~ /^(file|env)\:(.*)/) |
140
|
0 |
6 |
if ($1 eq 'file') |
141
|
0 |
0 |
unless -f $2 |
145
|
6 |
0 |
if ($1 eq 'env') |
146
|
0 |
6 |
unless defined $ENV{$2} |
162
|
0 |
10 |
unless &GetOptionsFromArray($arguments, $options, @cli_options) |
167
|
0 |
10 |
if (-p STDIN or -f STDIN) |
171
|
0 |
10 |
if $options->{'man'} |
172
|
0 |
10 |
if $options->{'help'} |
174
|
1 |
9 |
if $options->{'version'} |
176
|
1 |
8 |
if ($options->{'list-algorithms'}) |
181
|
0 |
8 |
unless $options->{'algorithm'} |
182
|
0 |
8 |
unless $options->{'input'} |
186
|
0 |
8 |
unless ($pbe_params) |
194
|
0 |
8 |
unless ($options->{'password'}) |
198
|
0 |
0 |
if ($options->{'encrypt'}) |
201
|
0 |
0 |
if ($input_password ne $test_password) |
212
|
0 |
8 |
if ($pbe_params->{'scheme'} eq 'pbes1') |
214
|
0 |
0 |
if ($options->{'verbose'}) |
230
|
8 |
0 |
if ($pbe_params->{'scheme'} eq 'pbes2') |
232
|
0 |
8 |
if ($options->{'verbose'}) |
237
|
0 |
0 |
if $options->{'password'} =~ /^(file|env)\:/ |
249
|
4 |
4 |
if ($options->{'encrypt'}) |
253
|
4 |
4 |
if ($options->{'decrypt'}) |
257
|
0 |
8 |
$options->{'null'} ? : |