| 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 |
12 |
if not ref $chk and $chk and $chk & 1 |
|
132
|
0 |
12 |
if not ref $chk and $chk and $chk & 2 |
|
133
|
2 |
10 |
if not ref $chk and $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 |
0 |
if not defined $decoded || ref $chk and $chk and $chk & 4 |
|
140
|
46 |
0 |
defined $decoded ? : |
|
|
46 |
0 |
unless $stop |
|
141
|
0 |
46 |
$stop ? : |
|
144
|
2 |
0 |
if not defined $decoded || ref $chk and $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 and $chk & 1 |
|
149
|
0 |
0 |
if not ref $chk and $chk and $chk & 2 |
|
150
|
0 |
0 |
if not ref $chk and $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
|
0 |
50212 |
unless defined $chk |
|
202
|
10 |
50202 |
if not ref $chk and $chk |
|
204
|
2 |
50206 |
if not ref $chk and $chk and $octets ne '' |
|
210
|
3 |
57 |
unless defined $str |
|
212
|
2 |
53 |
if not ref $chk and $chk and not $chk & 8 |
|
222
|
114 |
0 |
if ($line =~ s/^(.{0,$bpl})(\s|\z)//) { } |
|
|
0 |
0 |
elsif ($line =~ s/(\s)(.*)$//) { } |
|
224
|
57 |
57 |
if length $line |
|
228
|
0 |
0 |
if length $line |
|
240
|
0 |
57 |
$obj->{'bpl'} > 76 ? : |
|
243
|
0 |
57 |
unless defined $enc_chk |
|
244
|
4 |
53 |
if not ref $enc_chk and $enc_chk |
|
249
|
2 |
1254 |
unless (length $seq) |
|
253
|
57 |
1197 |
if ($obj->_encoded_word_len($octets . $seq) > $wordlen) |
|
259
|
57 |
0 |
if length $octets |
|
260
|
2 |
53 |
if not ref $chk and $chk and not $chk & 8 |
|
268
|
72 |
42 |
$encode eq 'B' ? : |
|
276
|
848 |
406 |
$encode eq 'B' ? : |