Branch Coverage

blib/lib/Encode/MIME/Header.pm
Criterion Covered Total %
branch 73 100 73.0


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' ? :