Condition Coverage

lib/MIME/AltWords.pm
Criterion Covered Total %
condition 47 65 72.3


and 3 conditions

line !l l&&!r l&&r condition
175 0 0 0 $J > $I + 1 and substr($src, $J - 1, 1) =~ tr/\200-\277//
176 0 0 0 $J > $I + 1 and substr($src, $J - 1, 1) =~ tr/\300-\377//
185 27 57 7 $opts->{'Encoding'} eq 'Q' and $addlen > $maxlen
84 0 7 $opts->{'Encoding'} eq 'Q' and $addlen > $maxlen and $addlen > 3
228 0 88 1 $J < length $S and substr($S, $J, 1) =~ /[ \n]/
229 32 14 317 $J + $maxlen < length $S && $J <= $I + $maxlen
235 42 28 18 $K > $I and $J > $I + $maxlen
325 4 52 23 $opts{'Encoding'} eq 'Q' and $opts{'Charset'} eq 'UTF-8'
337 1 60 18 $opts{'Keeptrailnl'} and $S =~ s/(\n)\Z(?!\n)//
351 13 28 94 $I > $lastpos and substr($S, $I - 1, 1) ne ' '
353 0 0 51 $pos = pos $S and $S =~ / |\Z(?!\n)|($MIME::AltWords::NONPRINT)/cog
0 41 10 $pos = pos $S and $S =~ / |\Z(?!\n)|($MIME::AltWords::NONPRINT)/cog and defined($D = $1)
41 0 10 $pos = pos $S and $S =~ / |\Z(?!\n)|($MIME::AltWords::NONPRINT)/cog and defined($D = $1) and $S =~ /\G[^ ]* */cog
359 12 0 29 $I + $srclen != length $S and substr($src, -1) eq ' '
12 0 29 $I + $srclen != length $S and substr($src, -1) eq ' ' and $S =~ / |\Z(?!\n)|($MIME::AltWords::NONPRINT)/cog
0 0 29 $I + $srclen != length $S and substr($src, -1) eq ' ' and $S =~ / |\Z(?!\n)|($MIME::AltWords::NONPRINT)/cog and not defined $1
372 0 15 12 0 < length $opts{'Space'} and length $S == $lastpos
522 15 8 22 $charset and !@L || $L[-1] ne $charset
597 7 4 16 $opts{'Raw'} and not defined $opts{'Charset'}

or 2 conditions

line l !l condition
521 30 15 $token->[1] || ''

or 3 conditions

line l !l&&r !l&&!r condition
522 22 5 3 !@L || $L[-1] ne $charset
644 3 0 45 $charset eq 'UTF-8' or $charset eq 'UTF8'