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) { } |