Branch Coverage

lib/Image/Info/JPEG.pm
Criterion Covered Total %
branch 56 84 66.6


line true false branch
57 0 880 unless defined $n
58 0 880 unless $n == $len
63 10 0 $] >= 5.008 ? :
80 0 10 if $@
94 1 32 unless ($soi eq "\377\330")
104 0 299 unless defined $ff
105 3 296 if ($ff != 255)
109 0 9 unless defined $ff
110 3 6 if $ff == 255
116 2 297 if ($mark == 255)
120 2 0 if $mark != 255
123 32 267 if $mark == 218 or $mark == 217
125 0 267 if $len < 2
135 3 264 if ($mark == 254) { }
52 212 elsif ($mark >= 224 and $mark <= 239) { }
32 180 elsif ($sof{$mark}) { }
139 41 11 if $img_no == 0
150 32 0 if $old_w < $width
151 32 0 if $old_h < $height
159 0 32 if ($num_comp == 1) { }
32 0 elsif ($num_comp == 3) { }
0 0 elsif ($num_comp == 4) { }
200 21 20 if ($id eq "0-JFIF\000") { }
0 20 elsif ($id eq "0-JFXX\000") { }
18 2 elsif ($id eq "1-Exif\000") { }
0 2 elsif ($id eq '14-Adobe') { }
221 0 21 if (length $data < 9)
229 0 21 $x_density != $y_density || !$unit ? :
232 21 0 if ($unit)
241 0 21 if ($x_thumb or $y_thumb)
258 0 0 if ($code == 16)
264 0 0 if $@
272 0 18 if ($null ne "\0")
279 0 18 unless ($t)
302 13 20 if (my($ipos) = $info->get_info($i, "JPEGInterchangeFormat", 1))
304 13 0 if ($ilen)
309 12 1 if ($jdata)
315 1 11 if $@
328 62 4 if ref $_ eq "Image::TIFF::Rational"
333 31 2 if ($xres and $yres)
334 31 0 $xres == $yres ? :
336 31 2 if $unit and $unit ne "pixels"