Branch Coverage

blib/lib/Data/Hierarchy.pm
Criterion Covered Total %
branch 64 72 88.8


line true false branch
154 184 21 if $args{'override_descendents'}
156 22 183 if $args{'override_sticky_descendents'}
182 222 112 unless $dont_clone
185 194 259 if (exists $$self{'sticky'}{$path})
187 114 80 unless $dont_clone
190 124 329 wantarray ? :
213 0 8 index($_, '.') == 0 ? :
215 2 6 unless exists $$lookat{$_} and $$lookat{$_} =~ /$$prop_regexps{$_}/
218 2 6 unless $matched
220 6 2 if $matched
246 4 14 unless defined $$other_props{$_}
288 6 665 if ($_[1] eq $_[0]{'sep'})
297 196 469 if $location_of_last_separator == -1
301 469 0 unless $location_of_last_separator == $potential_location_of_trailing_separator
314 35 170 exists $$self{'hash'}{$path} ? :
315 170 35 unless $old_props
317 140 231 if (index($_, '.') == 0) { }
318 134 6 defined $$merged_props{$_} ? :
324 12 219 unless defined $$merged_props{$_}
342 38 415 if exists $$hash{''}
345 194 259 if $path eq ''
350 259 0 unless (length $parts[0])
357 296 68 if exists $$hash{$current}
375 8 206 unless length $path
394 0 8 unless $$self{'sticky'}
414 59 54 unless %{$$hash{$datapoint};}
427 0 287 if $path eq '' or $path eq $$self{'sep'}
439 0 287 if $last_separator == -1
458 36 299 if $prefix and index($prefix . $$self{'sep'}, $path . $$self{'sep'}) != 0
463 0 315 unless (defined $$props{$name})
471 287 12 if (length $path)
479 15 286 if (defined $$parent_props{$name} and $$props{$name} eq $$parent_props{$name})
487 15 284 unless %{$$self{'hash'}{$path};}
496 0 289 unless (defined $$props{$name})
502 6 289 unless %{$$self{'sticky'}{$path};}
529 1 3 unless ($path eq $base_path or index($path, $base_path . $$self{'sep'}) == 0)