Branch Coverage

blib/lib/Lingua/Orthon.pm
Criterion Covered Total %
branch 25 34 73.5


line true false branch
116 1 6 unless ($self->{'_EQ'}->(map({substr $_, $i, 1;} $w1, $w2)))
139 2 11 unless ($self->{'_EQ'}->(@tmp))
159 1 0 hascontent($args{'test'}) ? :
163 1 0 ref $args{'sample'} ? :
168 4 2 if (_are_orthons($test_str, $sample_aref->[$_], $self->{'_EQ'}))
188 1 0 hascontent($args{'test'}) ? :
192 1 0 ref $args{'sample'} ? :
197 4 2 if (_are_orthons($test_str, $sample_aref->[$_], $self->{'_EQ'}))
215 91 44 if ($self->{'_MATCH_LEVEL'} == 1) { }
223 1 43 if ($self->{'_MATCH_LEVEL'} == 2)
246 3 0 hascontent($args{'test'}) ? :
250 3 0 ref $args{'sample'} ? :
258 3 0 is_numeric($args{'lim'}) && $args{'lim'} <= scalar @ldists ? :
299 0 12 if (nocontent($match_level_arg) or $match_level_arg == 0) { }
12 0 elsif (&any(sub { $match_level_arg == $_; } , 1..3)) { }
328 2 23 if length $w1 != length $w2
336 62 52 if (&$eq_fn(map({substr $_, $i, 1;} $w1, $w2)))