Branch Coverage

blib/lib/Tree/SEMETrie.pm
Criterion Covered Total %
branch 51 76 67.1


line true false branch
124 0 1 $childs_type eq 'HASH' ? :
0 1 $childs_type eq 'ARRAY' ? :
139 4 10 if (@_)
140 13 1 $$self[$VALUE] ? :
189 1 40 unless defined $key
198 6 62 if (not $childs_type) { }
27 35 elsif ($childs_type eq 'ARRAY') { }
208 26 1 if ($match_length == $old_key_length) { }
1 0 elsif ($match_length == $key_length - $key_iter) { }
233 34 6 $node ? :
253 3 0 $entry ? :
288 1 80 unless defined $key
299 50 128 if (not $childs_type) { }
50 78 elsif ($childs_type eq 'ARRAY') { }
316 5 45 if ($match_length == $old_key_length) { }
8 37 elsif ($match_length == $key_length - $key_iter) { }
347 10 27 if ($key_match ne '')
359 19 18 if ($old_key_tail eq '') { }
386 2 78 $$node[$VALUE] ? :
410 1 13 unless defined $key
421 1 25 if (not $childs_type) { }
10 15 elsif ($childs_type eq 'ARRAY') { }
432 9 1 if ($match_length == $old_key_length) { }
458 10 3 if ($node and $$node[$VALUE])
464 8 2 if (not $childs_type) { }
1 1 elsif ($childs_type eq 'ARRAY') { }
469 1 7 if ($parent_childs_type eq 'HASH') { }
474 1 0 if (keys %$parent_childs_ref == 1)
510 0 0 unless defined $key
518 0 0 if (not $childs_type) { }
521 0 0 $preexisting_value ? :
524 0 0 if ref $$merge_point[$CHILDS] eq 'ARRAY'
574 0 0 unless defined $key
585 0 0 if (not $childs_type) { }
0 0 elsif ($childs_type eq 'ARRAY') { }
596 0 0 if ($match_length == $old_key_length) { }
0 0 elsif ($match_length == $key_length - $key_iter) { }
635 0 0 if ($node and $$node[$CHILDS])