| File: | lib/CheckSpelling/Homoglyph.pm |
| Coverage: | 100.0% |
| line | % | coverage | branch | |
|---|---|---|---|---|
| 18 | 100 | T | F | unless open my $fh, "<:encoding(UTF-8)", $file |
| 24 | 100 | T | F | if /^#/ |
| 26 | 100 | T | F | unless /^($upper_pattern|$lower_pattern|$punctuation_pattern)((?:(?!$upper_pattern|$lower_pattern|$punctuation_pattern).)+)$/ |
| 33 | 100 | T | F | if (defined $homoglyph_map{$ch}) |
| 46 | 100 | T | F | if (scalar @known_aliases == 1) { } |