Branch Coverage

blib/lib/Lingua/DetectCyrillic.pm
Criterion Covered Total %
branch 59 128 46.0


line true false branch
44 6 19 if ($CodingIn eq $CodingOut)
46 7 12 if ($CodingIn =~ /(1251|win)/) { }
2 10 elsif ($CodingIn =~ /(koi8u|koi8-u)/) { }
2 8 elsif ($CodingIn =~ /koi/) { }
2 6 elsif ($CodingIn =~ /(dos|866|alt)/) { }
2 4 elsif ($CodingIn =~ /(iso|8859-5)/) { }
2 2 elsif ($CodingIn =~ /(mac|10007)/) { }
2 0 elsif ($CodingIn =~ /(utf|uni)/) { }
55 13 6 if ($CodingOut =~ /(1251|win)/) { }
1 5 elsif ($CodingOut =~ /(koi8u|koi8-u)/) { }
1 4 elsif ($CodingOut =~ /koi/) { }
1 3 elsif ($CodingOut =~ /(dos|866|alt)/) { }
1 2 elsif ($CodingOut =~ /(iso|8859-5)/) { }
1 1 elsif ($CodingOut =~ /(mac|10007)/) { }
1 0 elsif ($CodingOut =~ /(utf|uni)/) { }
65 2 17 if ($CodingIn eq 'utf-8')
67 0 2 if ($CodingOut eq 'utf-8') { }
70 1 16 if ($CodingOut eq 'utf-8')
77 1 0 if ($SourceCoding)
79 1 0 if ($SourceCoding)
84 1 0 if ($SourceCoding)
86 1 0 if ($SourceCoding)
102 1 0 if ($Args{'DetectAllLang'})
120 0 1 if (not $Outfile or uc $Outfile eq 'STDOUT') { }
145 1 0 if ($OUT ne \*STDOUT)
171 0 1 if ($Coding eq 'win1251') { }
0 1 elsif ($Coding eq 'koi8r') { }
0 1 elsif ($Coding eq 'koi8u') { }
0 1 elsif ($Coding eq 'iso') { }
0 1 elsif ($Coding eq 'cp866') { }
0 1 elsif ($Coding eq 'utf') { }
0 1 elsif ($Coding eq 'mac') { }
188 7 7 if ($FullStat) { }
215 0 14 if (%Stat->{$_}{'GoodTokensCount'} > $Args{'MaxTokens'})
218 0 2 if ($EnoughTokens)
249 7 0 if ($$arrayref[1] == $CyrCharRating[0][1])
258 0 1 if (scalar @BestCodings == 1)
263 0 0 if (%Stat->{$Coding}{'CharsUkr'} / %Stat->{$Coding}{'GoodTokensCount'} > $UkrTokensShare) { }
272 0 1 if (scalar @BestCodings == 2)
277 0 0 if ($BestCoding1 =~ /koi/ and $BestCoding2 =~ /koi/)
279 0 0 if (%Stat->{$Coding}{'GoodTokensCount'} > 0 and %Stat->{$Coding}{'CharsUkr'} / %Stat->{$Coding}{'GoodTokensCount'} > $UkrTokensShare) { }
287 0 0 if ($BestCoding1 =~ /(win1251|mac)/ and $BestCoding2 =~ /(win1251|mac)/)
289 0 0 if (%Stat->{$Coding}{'GoodTokensCount'} > 0 and %Stat->{$Coding}{'CharsUkr'} / %Stat->{$Coding}{'GoodTokensCount'} > $UkrTokensShare) { }
311 1 0 if ($MaxCharsProcessed == 0)
336 0 0 if ($WordsRating[0][2] > 0 and $WordsRating[0][2] > $WordsRating[1][2])
349 0 0 if ($$arrayref[2] == $WordsRating[0][2])
361 0 0 if ($$arrayref[1] eq 'Rus')
363 0 0 if ($$arrayref[1] eq 'Ukr')
374 0 0 if ($HashRating[0][2] > 0 and $HashRating[0][2] > $HashRating[1][2])
389 0 0 if ($$arrayref[2] == $HashRating[0][2])
406 0 0 if ($$arrayref[0] =~ /win/)
408 0 0 if (%Stat->{$Coding}{'GoodTokensCount'} > 0 and %Stat->{$Coding}{'CharsUkr'} / %Stat->{$Coding}{'GoodTokensCount'} > $UkrTokensShare) { }
416 0 0 if ($$arrayref[0] =~ /koi/)
448 21 21 if (not $FullStat) { }
452 0 21 if (/^[$RusCharset{'Lower'}]+$/ or /^[$RusCharset{'Upper'}]{1}[$RusCharset{'Lower'}]+$/ or /^[$RusCharset{'Upper'}]+$/)
455 0 0 if ($Coding eq 'utf')
458 0 0 if ($Args{'DetectAllLang'} and /[$RusCharset{'Ukrainian'}]/)
467 0 21 if (/[$RusCharset{'All'}]/ and /^[\w\d$RusCharset{'All'}]+$/)
470 0 0 if ($Coding eq 'utf')
472 0 0 if ($Args{'DetectAllLang'} and /[$RusCharset{'Ukrainian'}]/)
478 0 0 if ($DictRus{$_})
479 0 0 if ($Args{'DetectAllLang'} and $DictUkr{$_})
482 0 0 if ($WordHash2Rus{substr $_, $i, 2})
483 0 0 if ($Args{'DetectAllLang'} and $WordHash2Ukr{substr $_, $i, 2})