| 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))) |