Branch Coverage

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


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