Branch Coverage

lib/Config/Neat/Inheritable.pm
Criterion Covered Total %
branch 56 68 82.3


line true false branch
163 575 455 if (is_hash($node))
166 0 814 if defined $subnode
167 37 322 if is_hash($node->{$_}) and exists $node->{$_}{'@inherit'}
175 185 0 if (is_hash($node))
180 179 37 unless $subnode
184 65 114 if (exists $node->{'@inherit'})
185 0 65 unless ref $node->{'@inherit'} eq 'Config::Neat::Array'
195 31 39 if $filename eq '.'
196 0 70 unless $filename or $selector
199 37 33 $filename eq '' ? :
206 3 16 if $from eq $_
212 8 59 if (exists $self->{'cache'}{$from}) { }
217 31 28 if ($filename) { }
220 31 0 unless (exists $self->{'cache'}{$fullpath})
249 0 57 if $selector =~ m[/{2,}]
250 0 57 if $selector =~ m[^/]
252 23 34 if $selector eq ''
258 0 53 if $_ eq ''
259 52 1 if (is_hash($result) and exists $result->{$_}) { }
270 266 0 ref $data ? :
278 128 98 if (is_hash($data1) and is_hash($data2)) { }
10 113 elsif (is_neat_array($data1) and is_neat_array($data2)) { }
282 29 91 $key =~ /^[\+\-](.*)$/ ? :
284 11 109 if ($key =~ /^-(.*)$/)
285 0 11 unless $data1->{$key}->as_boolean
292 73 36 if (is_neat_array($data1->{$key}))
293 13 60 if ($key =~ /^\+(.*)$/) { }
294 13 0 if (not exists $data2->{$base_key} or is_neat_array($data2->{$base_key}))
299 8 3 if (is_simple_array($data1->{$key}) and exists $data2->{$base_key})
312 5 104 if (is_hash($data1->{$key}) and $key =~ /^\+(.*)$/)
317 11 98 if (is_hash($data1->{$key}) and is_hash($data2->{$key}))
325 42 21 if (exists $data2->{$key} and not exists $data1->{$key})
330 0 128 unless is_ixhash($data1)
335 8 2 if (is_simple_array($data2)) { }