Branch Coverage

blib/lib/Lingua/Treebank.pm
Criterion Covered Total %
branch 7 28 25.0


line true false branch
26 0 0 unless open my $fh, "<$file"
28 0 0 unless close $fh
38 0 2 unless (UNIVERSAL::isa($CONST_CLASS, 'Lingua::Treebank::Const'))
48 24 4 if (substr($_, 0, 3) eq '*x*' or substr($_, 0, 10) eq '==========')
55 2 2 if /^\s*$/
69 349 0 if (defined $token) { }
75 349 0 if (defined $utt) { }
101 0 0 unless open my $fh, "<$file"
103 0 0 unless close $fh
117 0 0 if /^\s*$/
118 0 0 if /^$/
125 0 0 if (length $text) { }
136 0 0 unless (defined $node)
161 0 0 if (length $text > $MAX_WARN_TEXT) { }