Branch Coverage

blib/lib/Encode/MIME/Header/ISO_2022_JP.pm
Criterion Covered Total %
branch 16 20 80.0


line true false branch
26 1 8 unless defined $str
28 8 0 if &Encode::is_utf8($str)
35 5 3 unless $trailing_crlf
50 0 4 if (not $wordstmp[$i] =~ /^[\x21-\x7E]+$/ || $wordstmp[$i + 1] =~ /^[\x21-\x7E]+$/) { }
63 6 6 if ($word =~ /^[\x21-\x7E]+$/) { }
65 0 6 if (length($1) + length($word) > $bpl) { }
78 0 12 if (length $1 == $bpl) { }
88 3 5 $crlf ? :
99 2 6 if (length($line) + 22 + $target =~ /^(?:$Encode::MIME::Header::ISO_2022_JP::RE{'EUC_0212'}|$Encode::MIME::Header::ISO_2022_JP::RE{'EUC_C'})/o * 8 > $bpl)
115 10 8 if (length($encoded) + length($line) > $bpl) { }