| line |
true |
false |
branch |
|
94
|
38 |
118 |
if (@_ % 2) |
|
101
|
4 |
151 |
unless defined $name and not ref $name and $name =~ /$ID_REX/i |
|
104
|
1 |
150 |
if defined $self->{'resource'}{$name} |
|
105
|
2 |
148 |
if $target->can($name) |
|
109
|
1 |
147 |
if @extra |
|
113
|
0 |
147 |
if exists $spec{'ignore_cache'} |
|
116
|
0 |
147 |
if delete $spec{'loose_deps'} |
|
120
|
142 |
5 |
unless (ref $spec{'require'}) |
|
121
|
3 |
139 |
defined $spec{'require'} ? : |
|
124
|
1 |
146 |
unless ref $spec{'require'} eq "ARRAY" |
|
127
|
1 |
145 |
if @bad |
|
131
|
4 |
141 |
if (defined(my $value = $spec{'literal'})) |
|
142
|
8 |
135 |
if defined $spec{'class'} |
|
144
|
20 |
117 |
if (my $deps = delete $spec{'dependencies'}) |
|
145
|
1 |
19 |
unless ref $deps eq "ARRAY" |
|
149
|
2 |
17 |
if @bad |
|
155
|
3 |
131 |
unless ref $spec{'init'} and builtin::reftype($spec{'init'}) eq $CODE |
|
157
|
3 |
128 |
if ($spec{'preload'}) |
|
158
|
1 |
2 |
if (defined $spec{'argument'}) { } |
|
160
|
0 |
1 |
unless ref $spec{'preload'} eq "ARRAY" and not grep({ref $_;} @{$spec{"preload"};}) |
|
166
|
118 |
13 |
if (not defined $spec{'argument'}) { } |
|
|
10 |
3 |
elsif (ref $spec{'argument'} eq $REGEXP) { } |
|
|
2 |
1 |
elsif ((builtin::reftype($spec{'argument'}) // '') eq $CODE) { } |
|
181
|
1 |
129 |
unless &looks_like_number($spec{'cleanup_order'}) |
|
184
|
2 |
127 |
if defined $spec{'check'} and (builtin::reftype($spec{'check'}) // "") ne $CODE |
|
186
|
1 |
126 |
if defined $spec{'coerce'} and (builtin::reftype($spec{'coerce'}) // "") ne $CODE |
|
188
|
2 |
124 |
if defined $spec{'cleanup'} and (builtin::reftype($spec{'cleanup'}) // "") ne $CODE |
|
190
|
2 |
122 |
if defined $spec{'fork_cleanup'} and (builtin::reftype($spec{'fork_cleanup'}) // "") ne $CODE |
|
192
|
1 |
14 |
if $spec{'fork_cleanup'} and $spec{'fork_safe'} |
|
199
|
10 |
6 |
unless not $self->{'resource'}{$_} |
|
200
|
104 |
17 |
unless $spec{'allowdeps'} |
|
201
|
7 |
114 |
if (@forward_deps) |
|
203
|
1 |
6 |
if ($loop) |
|
218
|
6 |
114 |
if (@forward_deps) { } |
|
225
|
3 |
117 |
if $spec{'preload'} |
|
236
|
1 |
7 |
unless $class =~ /$MOD_REX/ |
|
241
|
1 |
5 |
unless ref $spec->{'dependencies'} eq "HASH" |
|
255
|
1 |
6 |
if (ref $entry eq "SCALAR") |
|
261
|
1 |
5 |
if (defined $entry and not ref $entry) |
|
263
|
1 |
0 |
if $entry eq 1 |
|
266
|
2 |
3 |
unless ref $entry eq "ARRAY" and @$entry <= 2 and ($entry->[0] // "") =~ /$ID_REX/ |
|
274
|
1 |
2 |
length($entry->[1] // '') ? : |
|
279
|
1 |
1 |
if %pass_args |
|
291
|
1 |
1 |
%pass_args ? : |
|
314
|
5 |
1 |
wantarray ? : |
|
330
|
1 |
5 |
unless $spec |
|
335
|
2 |
3 |
if (my $deps = delete $show{'allowdeps'}) |
|
339
|
5 |
0 |
if (exists $show{'orig_argument'}) |
|
370
|
1 |
1 |
unless eval {
do {
&load($mod);
1
}
} |
|
387
|
3 |
71 |
if (@unsatisfied) |
|
415
|
1 |
7 |
unless $res and $res->{'origin'} |