| line |
true |
false |
branch |
|
71
|
52 |
4 |
if $self->{'-spec'} |
|
78
|
0 |
19 |
unless $container |
|
118
|
2 |
161 |
unless $name =~ /$ID_REX/i |
|
124
|
1 |
160 |
unless $spec |
|
126
|
1 |
159 |
if ref $arg |
|
129
|
2 |
157 |
unless $spec->{'argument'}->($arg) |
|
132
|
1 |
156 |
if $self->{'-cleanup'} |
|
136
|
1 |
4 |
if $self->{'-locked'} and not $spec->{'derived'} and not $self->{'-override'}{$name} |
|
139
|
28 |
127 |
length $arg ? : |
|
140
|
1 |
154 |
if ($self->{'-pending'}{$key}) |
|
147
|
1 |
5 |
unless eval {
do {
&load($mod);
1
}
} |
|
158
|
8 |
134 |
unless (defined $entity) |
|
159
|
3 |
5 |
if $spec->{'nullable'} |
|
162
|
4 |
130 |
if ($spec->{'coerce'}) |
|
164
|
2 |
2 |
if not defined $entity or ref $entity eq "" and $entity eq "" |
|
168
|
4 |
128 |
if $spec->{'check'} |
|
179
|
9 |
18 |
if $opt{'fork'} and not $opt{'force'} and $spec->{'fork_safe'} |
|
184
|
130 |
7 |
unless ($self->{'-override'}{$name}) |
|
187
|
27 |
103 |
$opt{'fork'} ? : |
|
193
|
59 |
78 |
if ($action) |
|
199
|
3 |
55 |
unless (eval {
do {
&$action($known->{$arg});
1
}
}) |
|
220
|
5 |
176 |
if ($self->{'-pid'} != (my $pid = $$)) |
|
227
|
5 |
176 |
if $self->{'-allow'} and not $self->{'-allow'}{$name} |
|
231
|
39 |
137 |
defined $arg && !ref($arg) ? : |
|
232
|
154 |
22 |
unless (exists $self->{'-cache'}{$name}{$key}) |
|
245
|
3 |
8 |
if @bad |
|
256
|
1 |
12 |
unless $known->{$name} |
|
263
|
11 |
1 |
if (defined $init) { } |
|
266
|
1 |
10 |
(builtin::reftype($init) // '') eq 'CODE' ? : |
|
278
|
0 |
5 |
$spec->{'autodeps'} ? : |
|
291
|
1 |
3 |
if $meta |
|
344
|
5 |
3 |
if $$ != $$self->{'-pid'} |
|
420
|
8 |
67 |
if $$ != $$self->{'-pid'} |
|
478
|
2 |
4 |
length $arg ? : |
|
481
|
4 |
1 |
wantarray ? : |