Condition Coverage

blib/lib/Lingua/EL/Poly2Mono.pm
Criterion Covered Total %
condition 40 93 43.0


and 3 conditions

line !l l&&!r l&&r condition
498 8 0 2 $thischar =~ /^$Lingua::EL::Poly2Mono::ui$/ && @lexis && $lexis[$#lexis] =~ /^$Lingua::EL::Poly2Mono::diphpre$/
505 0 0 10 $lexis[$#lexis] =~ /^$Lingua::EL::Poly2Mono::gramma$/ && scalar @lexis
8 2 0 $cpos < $#lexis and 2 > scalar @lexis
509 0 10 4 $lexis[$_] =~ /^$Lingua::EL::Poly2Mono::gramma$/ and not $lexis[$_] =~ /^$Lingua::EL::Poly2Mono::conson$/
522 2 10 8 $1 =~ /^$Lingua::EL::Poly2Mono::gramma$/ and not $lll =~ /^$Lingua::EL::Poly2Mono::conson$/
532 8 0 2 $thischar =~ /^$Lingua::EL::Poly2Mono::psiliaccent_lc$/ and not $fphon
0 2 0 $fsyl && $lsyl
8 0 2 $thischar =~ /^$Lingua::EL::Poly2Mono::psiliaccent_lc$/ and not $fphon and not $fsyl && $lsyl
8 0 0 $thischar eq "\341\277\246" and join('', @lexis) =~ /^(?:\316\240|\317\200)\316\277$/
8 0 0 $thischar eq "\341\277\246" and join('', @lexis) =~ /^(?:\316\240|\317\200)\316\277$/ and not $orig =~ /^$Lingua::EL::Poly2Mono::gramma/
8 0 0 $thischar eq "\341\277\266" and join('', @lexis) =~ /\316\240|\317\200$/
8 0 0 $thischar eq "\341\277\266" and join('', @lexis) =~ /\316\240|\317\200$/ and $orig =~ /^\317\202(?!$Lingua::EL::Poly2Mono::gramma)/
8 0 0 $thischar =~ /^(?:\341\274\242|\341\274\244)/ and not @lexis
8 0 0 $thischar =~ /^(?:\341\274\242|\341\274\244)/ and not @lexis and $orig =~ /^(?!$Lingua::EL::Poly2Mono::gramma)/
4 4 0 $thischar =~ /^(?:\341\275\260|\341\275\261)/ and join('', @lexis) =~ /(?:\316\223|\316\263|\316\240|\317\200)\316\271$/
8 0 0 $thischar =~ /^(?:\341\275\260|\341\275\261)/ and join('', @lexis) =~ /(?:\316\223|\316\263|\316\240|\317\200)\316\271$/ and $orig =~ /^(?!$Lingua::EL::Poly2Mono::gramma)/
8 0 0 $thischar =~ /^(?:\341\275\270|\341\275\271)/ and join('', @lexis) =~ /(?:\316\240|\317\200)\316\271$/
8 0 0 $thischar =~ /^(?:\341\275\270|\341\275\271)/ and join('', @lexis) =~ /(?:\316\240|\317\200)\316\271$/ and $orig =~ /^(?!$Lingua::EL::Poly2Mono::gramma)/
4 4 0 $fsyl and $lsyl
8 0 0 $thischar =~ /${\join('|', keys %Lingua::EL::Poly2Mono::direm);}/ and not $lexis[$#lexis] =~ /^$Lingua::EL::Poly2Mono::diphpre$/
8 0 0 $thischar =~ /\317\212|\341\277\223|\341\277\222|\341\277\227|\316\252/ and not $lexis[$#lexis] =~ /\316\221|\316\225|\316\237|\316\245|\316\261|\316\265|\316\277|\317\205/
8 0 0 $thischar =~ /\317\213|\341\277\243|\341\277\242|\341\277\247|\316\253/ and not $lexis[$#lexis] =~ /\316\221|\316\225|\316\227|\316\237|\316\261|\316\265|\316\267|\316\277/

or 3 conditions

line l !l&&r !l&&!r condition
481 0 1 1 $Lingua::EL::Poly2Mono::OLD_PERL or not is_utf8($_[0])
496 0 48 0 $Lingua::EL::Poly2Mono::p2m{$thischar} || $thischar
505 0 0 10 not $lexis[$#lexis] =~ /^$Lingua::EL::Poly2Mono::gramma$/ && scalar @lexis or $cpos < $#lexis and 2 > scalar @lexis
532 0 0 8 $fsyl and $lsyl or $prevvowel =~ /$Lingua::EL::Poly2Mono::accent/
0 0 8 $thischar =~ /${\join('|', keys %Lingua::EL::Poly2Mono::direm);}/ and not $lexis[$#lexis] =~ /^$Lingua::EL::Poly2Mono::diphpre$/ or $thischar =~ /\317\212|\341\277\223|\341\277\222|\341\277\227|\316\252/ and not $lexis[$#lexis] =~ /\316\221|\316\225|\316\237|\316\245|\316\261|\316\265|\316\277|\317\205/
0 0 8 $thischar =~ /${\join('|', keys %Lingua::EL::Poly2Mono::direm);}/ and not $lexis[$#lexis] =~ /^$Lingua::EL::Poly2Mono::diphpre$/ or $thischar =~ /\317\212|\341\277\223|\341\277\222|\341\277\227|\316\252/ and not $lexis[$#lexis] =~ /\316\221|\316\225|\316\237|\316\245|\316\261|\316\265|\316\277|\317\205/ or $thischar =~ /\317\213|\341\277\243|\341\277\242|\341\277\247|\316\253/ and not $lexis[$#lexis] =~ /\316\221|\316\225|\316\227|\316\237|\316\261|\316\265|\316\267|\316\277/
534 2 0 0 $Lingua::EL::Poly2Mono::remove{$thischar} || $thischar
566 0 0 0 $Lingua::EL::Poly2Mono::remove{$thischar} || $thischar
571 8 0 0 $Lingua::EL::Poly2Mono::p2m{$thischar} || $thischar