| line |
true |
false |
branch |
|
17
|
3 |
35 |
if $args[0] and $#args == 0 |
|
25
|
7 |
31 |
if ($$self{'domain'} =~ s/[^a-zA-Z0-9]+/_/g) |
|
33
|
16 |
22 |
if $self->autoload |
|
93
|
0 |
117 |
if (ref $value) |
|
94
|
0 |
0 |
if ('ARRAY' eq ref $value) |
|
111
|
112 |
5 |
if ($self->mirror) |
|
127
|
0 |
148 |
unless defined $key |
|
134
|
62 |
86 |
if (@_ > 2) |
|
139
|
68 |
2 |
unless (exists $ENV{$self->to_env_key($key)} and not $self->override) |
|
149
|
108 |
40 |
if (exists $$self{'registry'}{'env'}{$key}) |
|
154
|
40 |
108 |
unless ($result) |
|
159
|
73 |
35 |
if (exists $$node{$step}) { } |
|
160
|
0 |
73 |
if ($i < @steps and 'HASH' ne ref $node) |
|
161
|
0 |
0 |
if undef $node |
|
166
|
0 |
35 |
if undef $node |
|
173
|
11 |
137 |
unless ($result) |
|
176
|
11 |
0 |
unless ($result = $self->stash->{$key}) |
|
181
|
11 |
24 |
if ('ARRAY' eq ref $node) { } |
|
|
24 |
0 |
elsif ('HASH' eq ref $node) { } |
|
182
|
0 |
11 |
if ($i < @steps and not defined $$node[$step]) { } |
|
183
|
0 |
0 |
if undef $node |
|
190
|
0 |
24 |
if ($i < @steps and not defined $$node{$step}) { } |
|
191
|
0 |
0 |
if undef $node |
|
198
|
0 |
0 |
if undef $node |
|
212
|
1 |
1 |
if ($#keys == 0) |
|
213
|
1 |
0 |
if ('HASH' eq ref $keys[0]) |
|
222
|
1 |
0 |
wantarray ? : |
|
266
|
128 |
49 |
if defined $$self{'subdomain'} |
|
292
|
2 |
36 |
if ($self->lifecycle) |