| line |
true |
false |
branch |
|
81
|
4 |
200 |
unless defined $str |
|
83
|
88 |
112 |
$STRICT_DECODE ? : |
|
84
|
88 |
112 |
$STRICT_DECODE ? : |
|
93
|
25 |
391 |
defined $2 ? : |
|
95
|
196 |
220 |
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 |
50211 |
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 |
50165 |
if (uc $mime_enc eq 'B' and $obj->{'decode_b'}) { } |
|
|
50165 |
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 |
50163 |
if not defined $decoded || ref $chk and $chk & 4 |
|
145
|
50163 |
0 |
defined $decoded ? : |
|
|
50163 |
2 |
unless $stop |
|
146
|
2 |
50163 |
$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
|
193 |
4 |
unless ($stop) |
|
167
|
216 |
200 |
unless ($stop) |
|
178
|
3 |
194 |
if not ref $chk and $chk and not $chk & 8 |
|
188
|
10 |
36 |
$STRICT_DECODE ? : |
|
201
|
10 |
50201 |
if not ref $chk and $chk |
|
203
|
2 |
50205 |
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' ? : |