line |
true |
false |
branch |
29
|
22 |
43 |
unless (defined &{"checkdep_$dname";}) |
33
|
22 |
0 |
unless defined &{"checkdep_$dname";} |
37
|
22 |
21 |
if ($res) |
50
|
7 |
4 |
if $res |
59
|
4 |
12 |
unless check_deps($_) |
62
|
5 |
1 |
$nfail ? : |
69
|
4 |
6 |
unless $res |
76
|
1 |
2 |
$ENV{$cval} ? : |
81
|
1 |
1 |
&$cval() ? : |
87
|
5 |
4 |
ref $cval eq 'HASH' ? : |
88
|
0 |
9 |
unless my $prog_name = $cval->{'name'} |
90
|
3 |
6 |
if ($prog_name =~ m[/]) { } |
91
|
1 |
2 |
unless -x $prog_name |
94
|
0 |
6 |
unless File::Which::which($prog_name) |
99
|
4 |
4 |
if (defined $cval->{'min_version'}) |
105
|
2 |
2 |
if ($prog_name eq 'git') { } |
|
2 |
0 |
elsif ($prog_name eq 'perl') { } |
107
|
2 |
0 |
$_[0] =~ /git version (.+)/ ? : |
110
|
2 |
0 |
$_[0] =~ /\(v(.+?)\)/ ? : |
116
|
0 |
4 |
$? < 0 ? : |
117
|
0 |
4 |
if $exit_code |
119
|
0 |
4 |
unless ($ver) = &$ver_extract($ver) |
121
|
2 |
2 |
if Version::Util::version_lt($ver, $cval->{'min_version'}) |
128
|
0 |
0 |
if $pa |
137
|
0 |
0 |
unless $res->[0] == 200 |
139
|
0 |
0 |
unless $res->[2]{'type'} eq "package" |
146
|
0 |
0 |
unless $res->[0] == 200 |
148
|
0 |
0 |
unless $res->[2]{'type'} eq "function" |
169
|
57 |
42 |
if grep {$_ eq $el;} @$ary |
174
|
8 |
2 |
if $_ |
|
6 |
4 |
if grep {$_ eq $el;} @$ary |
185
|
42 |
237 |
if ($dname eq 'all') { } |
|
42 |
195 |
elsif ($dname eq 'any') { } |
|
63 |
132 |
elsif ($dname eq 'none') { } |
188
|
1 |
41 |
unless @r |
189
|
6 |
35 |
if "impossible" ~~ \@r |
190
|
22 |
13 |
if "must" ~~ \@r and "must not" ~~ \@r |
191
|
4 |
9 |
if "must" ~~ \@r |
192
|
4 |
5 |
if "must not" ~~ \@r |
193
|
3 |
2 |
if _all_nonblank_elems_is(\@r, "might") |
197
|
1 |
41 |
unless @r |
198
|
6 |
35 |
if "impossible" ~~ \@r |
199
|
2 |
33 |
if _all_elems_is(\@r, "must") |
200
|
2 |
31 |
if _all_elems_is(\@r, "must not") |
201
|
2 |
29 |
if _all_elems_is(\@r, "") |
206
|
1 |
62 |
unless @r |
207
|
6 |
56 |
if "impossible" ~~ \@r |
208
|
1 |
55 |
if "must" ~~ \@r and "must not" ~~ \@r |
209
|
46 |
9 |
if "must" ~~ \@r |
210
|
4 |
5 |
if "must not" ~~ \@r |
211
|
3 |
2 |
if _all_nonblank_elems_is(\@r, "might") |
213
|
107 |
25 |
if $dname eq $wanted |
224
|
3 |
1 |
unless $dname ~~ \@$res |
225
|
1 |
3 |
if ($dname =~ /\A(?:all|any|none)\z/) |