line |
true |
false |
branch |
81
|
4 |
202 |
unless defined $str |
83
|
89 |
113 |
$STRICT_DECODE ? : |
84
|
89 |
113 |
$STRICT_DECODE ? : |
93
|
25 |
395 |
defined $2 ? : |
95
|
198 |
222 |
unless length $line or length $sep |
124
|
6 |
10 |
unless (defined $enc or $STRICT_DECODE) |
126
|
2 |
4 |
if lc $charset eq 'utf8' |
130
|
13 |
50212 |
if (not defined $enc) { } |
131
|
0 |
13 |
if not ref $chk and $chk & 1 |
132
|
0 |
13 |
if not ref $chk and $chk & 2 |
133
|
2 |
11 |
if not ref $chk and $chk & 4 |
134
|
5 |
6 |
$output =~ /(?:\A|[ \t])$/ ? : |
|
11 |
2 |
unless $stop |
135
|
2 |
11 |
$stop ? : |
137
|
46 |
50166 |
if (uc $mime_enc eq 'B' and $obj->{'decode_b'}) { } |
|
50166 |
0 |
elsif (uc $mime_enc eq 'Q' and $obj->{'decode_q'}) { } |
139
|
0 |
46 |
if not defined $decoded || ref $chk and $chk & 4 |
140
|
46 |
0 |
defined $decoded ? : |
|
46 |
0 |
unless $stop |
141
|
0 |
46 |
$stop ? : |
144
|
2 |
50164 |
if not defined $decoded || ref $chk and $chk & 4 |
145
|
50164 |
0 |
defined $decoded ? : |
|
50164 |
2 |
unless $stop |
146
|
2 |
50164 |
$stop ? : |
148
|
0 |
0 |
if not ref $chk and $chk & 1 |
149
|
0 |
0 |
if not ref $chk and $chk & 2 |
150
|
0 |
0 |
if not ref $chk and $chk & 4 |
151
|
0 |
0 |
$output =~ /(?:\A|[ \t])$/ ? : |
|
0 |
0 |
unless $stop |
152
|
0 |
0 |
$stop ? : |
158
|
194 |
4 |
unless ($stop) |
167
|
218 |
202 |
unless ($stop) |
178
|
3 |
196 |
if not ref $chk and $chk and not $chk & 8 |
188
|
10 |
36 |
$STRICT_DECODE ? : |
201
|
10 |
50202 |
if not ref $chk and $chk |
203
|
2 |
50206 |
if not ref $chk and $chk and $octets ne '' |
209
|
3 |
57 |
unless defined $str |
211
|
2 |
53 |
if not ref $chk and $chk and not $chk & 8 |
221
|
114 |
0 |
if ($line =~ s/^(.{0,$bpl})(\s|\z)//) { } |
|
0 |
0 |
elsif ($line =~ s/(\s)(.*)$//) { } |
223
|
57 |
57 |
if length $line |
227
|
0 |
0 |
if length $line |
239
|
0 |
57 |
$obj->{'bpl'} > 76 ? : |
241
|
4 |
53 |
!ref($chk) && $chk ? : |
246
|
2 |
1254 |
unless (length $seq) |
250
|
57 |
1197 |
if ($obj->_encoded_word_len($octets . $seq) > $wordlen) |
256
|
57 |
0 |
if length $octets |
257
|
2 |
53 |
if not ref $chk and $chk and not $chk & 8 |
265
|
72 |
42 |
$encode eq 'B' ? : |
273
|
848 |
406 |
$encode eq 'B' ? : |