| blib/lib/Text/Levenshtein.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 26 | 26 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 6 | 122 | if @_ > 0 and ref $_[-1] eq 'HASH' |
| 19 | 2 | 126 | if @_ < 2 |
| 23 | 7 | 119 | unless defined $opt |
| 29 | 10 | 116 | wantarray ? : |
| 44 | 140 | 114 | if @_ > 0 and ref $_[-1] eq 'HASH' |
| 45 | 3 | 251 | unless @_ == 2 |
| 51 | 56 | 195 | unless defined $opt |
| 52 | 12 | 239 | if ($opt->{'ignore_diacritics'}) { } |
| 53 | 1 | 11 | unless (defined $eq_without_diacritics) |
| 66 | 20 | 231 | if $s eq $t |
| 67 | 3 | 228 | if not $t or length $t == 0 |
| 68 | 5 | 223 | if not $s or length $s == 0 |
| 82 | 916 | 4152 | &$eq(substr($s, $i, 1), substr($t, $j, 1)) ? : |