Branch Coverage

blib/lib/Tree/Lexicon.pm
Criterion Covered Total %
branch 71 90 78.8


line true false branch
142 0 5 $cs ? :
5 5 defined $cs ? :
164 252 120 if ($$self{'CASE'}) { }
190 0 0 $$self{'CASE'} ? :
248 116 $$self{'CASE'} ? :
0 364 wantarray || @_ > 1 ? :
212 0 0 $$self{'CASE'} ? :
992 464 $$self{'CASE'} ? :
0 1456 wantarray || @_ > 1 ? :
232 0 26 unless ($prefix and $prefix =~ /^\w+/)
237 26 0 unless $$self{'CASE'}
241 5 21 unless defined $node
244 9 12 if $$node[1]
277 500 236 $$self{'CASE'} ? :
291 0 4320 unless ($string and $string =~ /^\w+$/)
302 2585 1735 if ($root) { }
304 21 2564 if ($string eq $$node[0]) { }
311 626 1938 unless ($$node[0] eq $root)
318 2500 64 if $string
337 0 364 unless ($sought and $sought =~ /^\w+$/)
346 1055 0 if ($root eq $$node[0]) { }
352 691 364 if ($sought) { }
360 0 364 unless $$node[1]
369 364 0 if ($found)
373 54 419 unless @stack
389 0 1456 unless ($sought and $sought =~ /^\w+$/)
398 700 2922 unless $node and $root eq $$node[0]
401 2166 756 if $sought
415 471 130 if $$node[1]
426 5076 26681 $$_[1] ? :
31757 57288 @{$$_[-1];} ? :
437 1544 4938 $$_[1] ? :
6482 12508 @{$$_[-1];} ? :
452 6039 3512 if $string2 =~ /^$string1/
459 2835 677 unless $string2 =~ /^$root/
466 677 291 unless ($string2 =~ /^$root/)
488 9852 6894 if ($sought lt $$nodes[$mid][0]) { }
500 1627 6323 unless ($pos >= 0 and $node = $$nodes[$pos] and $root = _gc_root($$node[0], $sought))
508 1601 1099 if $pos < scalar @{$nodes;} and $node = $$nodes[$pos]
524 26 0 unless $ext_root
528 21 5 if ($root)
533 21 0 if $$node[0] =~ /^$string/
537 0 0 if $string =~ s/^$$node[0]//
552 172 18818 if $lc eq $str
559 18829 48311 $lc_char eq $uc_char ? :