| File: | lib/CheckSpelling/Homoglyph.pm |
| Coverage: | 56.2% |
| line | % | coverage | branch | |
|---|---|---|---|---|
| 18 | 50 | T | F | unless open my $fh, "<:encoding(UTF-8)", $file |
| 27 | 50 | T | F | if /^#/ |
| 29 | 50 | T | F | unless /(.)(.+)/ |
| 32 | 50 | T | F | unless $expected =~ /$upper_pattern|$lower_pattern|$punctuation_pattern/ |
| 33 | 50 | T | F | unless $expected =~ /$upper_pattern|$lower_pattern/ |
| 36 | 50 | T | F | if ($ch =~ /$ignore_pattern/) |
| 39 | 100 | T | F | if (defined $homoglyph_map{$ch}) |
| 53 | 50 | T | F | if (scalar @known_aliases == 1) { } |