Branch Coverage

blib/lib/Lingua/EN/CommonMistakes.pm
Criterion Covered Total %
branch 19 22 86.3


line true false branch
23 6 4400 unless $line
25 6 4394 if ($line =~ /\A:[^\s]+\z/)
43 5 5 if (substr($arg, 0, 1) eq '%') { }
5 0 elsif (substr($arg, 0, 1) eq ':') { }
47 0 5 if ($arg eq ':no-defaults') { }
1 4 elsif ($arg =~ /\A:no-(.+)\z/) { }
60 2 5 unless (@out_name)
64 0 7 if ($tags{':american'} and $tags{':british'})
68 2 5 unless (%MISTAKES)
74 2 15 if (not $MISTAKES{$tag}) { }
75 1 1 if (warnings::enabled('Lingua::EN::CommonMistakes'))