| line |
true |
false |
branch |
|
36
|
0 |
0 |
unless $match =~ s/\@VERSION\@/$App::newver::Scanner::MAYBE_VERSION_RX/gu |
|
40
|
0 |
0 |
unless open my $fh, "<", $file |
|
43
|
0 |
0 |
unless $l =~ /$match/u |
|
58
|
0 |
0 |
if (defined $ini->{$program}{'Version'}) { } |
|
|
0 |
0 |
elsif (defined $ini->{$program}{'VersionScan'}) { } |
|
63
|
0 |
0 |
unless ("File::Spec"->file_name_is_absolute($f)) |
|
107
|
0 |
0 |
unless &GetOptionsFromArray(\@argv, "j|json", \$self->{'JSON'}, "s|serial", sub {
$self->{'Parallel'} = 0;
}
, "V|verbose", \$self->{'Verbose'}, "h|help", sub {
print $USAGE;
exit 0;
}
, "v|version", sub {
say $PRGVER;
exit 0;
}
) |
|
110
|
0 |
0 |
unless (defined $self->{'ScanFile'}) |
|
114
|
0 |
0 |
if (@argv) |
|
121
|
0 |
0 |
unless (@{$self->{'Programs'};}) |
|
133
|
0 |
0 |
if ($self->{'Verbose'}) |
|
183
|
0 |
0 |
if ($code == 0 and defined $job) |
|
190
|
0 |
0 |
if my $pid = $pm->start |
|
191
|
0 |
0 |
if (defined $self->{'ToDos'} and not $self->{'ToDos'}{$j->{'Program'}}) |
|
201
|
0 |
0 |
if (defined $scan) |
|
203
|
0 |
0 |
if (defined $j->{'ReturnURL'}) |
|
212
|
0 |
0 |
unless (@scanned) |
|
216
|
0 |
0 |
if ($self->{'JSON'}) { } |
|
230
|
0 |
0 |
if (defined $self->{'ToDos'} and not $self->{'ToDos'}{$j->{'Program'}}) |
|
240
|
0 |
0 |
if (defined $scan) |
|
242
|
0 |
0 |
if (defined $j->{'ReturnURL'}) |
|
249
|
0 |
0 |
unless (@scanned) |
|
253
|
0 |
0 |
if ($self->{'JSON'}) { } |
|
266
|
0 |
0 |
if ($self->{'Parallel'}) { } |