| line |
true |
false |
branch |
|
49
|
7 |
40 |
if &blessed($class) |
|
51
|
0 |
47 |
unless my $spec = $Resource::Silo::metadata{$class} |
|
58
|
4 |
43 |
if (@_) |
|
59
|
1 |
3 |
if @_ % 2 |
|
78
|
0 |
19 |
unless $container |
|
114
|
0 |
74 |
unless $$facade |
|
124
|
2 |
99 |
unless $name =~ /$ID_REX/i |
|
130
|
1 |
98 |
unless $spec |
|
132
|
1 |
97 |
if ref $arg |
|
135
|
2 |
95 |
unless $spec->{'argument'}->($arg) |
|
138
|
1 |
94 |
if $self->{'-cleanup'} |
|
142
|
1 |
4 |
if $self->{'-locked'} and not $spec->{'derived'} and not $self->{'-override'}{$name} |
|
145
|
0 |
93 |
if $self->{'-allow'} and not $self->{'-allow'}{$name} |
|
149
|
22 |
71 |
length $arg ? : |
|
150
|
1 |
92 |
if ($self->{'-pending'}{$key}) |
|
157
|
1 |
5 |
unless eval {
do {
&load($mod);
1
}
} |
|
172
|
71 |
4 |
unless ($self->{'-override'}{$name}) |
|
181
|
75 |
0 |
unless @list |
|
186
|
12 |
73 |
unless defined $known->{$arg} |
|
187
|
13 |
60 |
if $action |
|
198
|
1 |
59 |
if ($spec->{'ignore_cache'}) |
|
209
|
1 |
108 |
if ($self->{'-pid'} != $$) |
|
215
|
3 |
106 |
if $self->{'-allow'} and not $self->{'-allow'}{$name} |
|
219
|
32 |
74 |
defined $arg && !ref($arg) ? : |
|
230
|
3 |
2 |
if @bad |
|
241
|
1 |
5 |
unless $known->{$name} |
|
248
|
4 |
1 |
if (defined $init) { } |
|
251
|
0 |
4 |
(&reftype($init) // '') eq 'CODE' ? : |
|
390
|
1 |
69 |
unless (eval {
do {
$self->_cleanup_resource($name);
1
}
}) |