Condition Coverage

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


and 3 conditions

line !l l&&!r l&&r condition
185 0 0 0 $J > $I + 1 and substr($src, $J - 1, 1) =~ tr/\200-\277//
186 0 0 0 $J > $I + 1 and substr($src, $J - 1, 1) =~ tr/\300-\377//
195 27 57 7 $opts->{'Encoding'} eq 'Q' and $addlen > $maxlen
84 0 7 $opts->{'Encoding'} eq 'Q' and $addlen > $maxlen and $addlen > 3
238 0 88 1 $J < length $S and substr($S, $J, 1) =~ /[ \n]/
239 32 14 317 $J + $maxlen < length $S && $J <= $I + $maxlen
245 42 28 18 $K > $I and $J > $I + $maxlen
335 4 52 23 $opts{'Encoding'} eq 'Q' and $opts{'Charset'} eq 'UTF-8'
347 1 60 18 $opts{'Keeptrailnl'} and $S =~ s/(\n)\Z(?!\n)//
361 13 28 94 $I > $lastpos and substr($S, $I - 1, 1) ne ' '
363 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
369 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
382 0 15 12 0 < length $opts{'Space'} and length $S == $lastpos
433 15 8 22 $charset and !@L || $L[-1] ne $charset
508 7 4 16 $opts{'Raw'} and not defined $opts{'Charset'}

or 2 conditions

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

or 3 conditions

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