blib/lib/Lingua/TypoGenerator.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 14 | 78.5 |
line | true | false | branch |
---|---|---|---|
33 | 0 | 21 | unless $c =~ /\w/ |
40 | 21 | 0 | if ($HTYPOS =~ /(.)$c(.)/i) |
41 | 19 | 2 | if ($1 ne ' ') |
46 | 20 | 1 | if ($2 ne ' ') |
53 | 7 | 14 | if ($args{'accents'}) |
56 | 5 | 44 | if ($class =~ s/$c//i) |
71 | 0 | 18 | unless substr($t, $i - 1, 2) =~ /\w\w/ |