Branch Coverage

lib/Image/Info/JPEG.pm
Criterion Covered Total %
branch 54 82 65.8


line true false branch
57 0 778 unless defined $n
58 0 778 unless $n == $len
63 7 0 $] >= 5.008 ? :
80 0 7 if $@
94 0 28 unless ($soi eq "\377\330")
104 0 264 unless defined $ff
105 3 261 if ($ff != 255)
109 0 9 unless defined $ff
110 3 6 if $ff == 255
116 2 262 if ($mark == 255)
120 2 0 if $mark != 255
123 28 236 if $mark == 218 or $mark == 217
125 0 236 if $len < 2
135 3 233 if ($mark == 254) { }
43 190 elsif ($mark >= 224 and $mark <= 239) { }
28 162 elsif ($sof{$mark}) { }
139 32 11 if $img_no == 0
150 28 0 if $old_w < $width
151 28 0 if $old_h < $height
159 0 28 if ($num_comp == 1) { }
28 0 elsif ($num_comp == 3) { }
0 0 elsif ($num_comp == 4) { }
200 17 15 if ($id eq "0-JFIF\000") { }
0 15 elsif ($id eq "0-JFXX\000") { }
14 1 elsif ($id eq "1-Exif\000") { }
0 1 elsif ($id eq '14-Adobe') { }
221 0 17 if (length $data < 9)
229 0 17 $x_density != $y_density || !$unit ? :
232 17 0 if ($unit)
241 0 17 if ($x_thumb or $y_thumb)
258 0 0 if ($code == 16)
264 0 0 if $@
272 0 14 if ($null ne "\0")
279 0 14 unless ($t)
302 12 16 if (my($ipos) = $info->get_info($i, "JPEGInterchangeFormat", 1))
304 12 0 if ($ilen)
309 11 1 if ($jdata)
325 50 6 if ref $_ eq "Image::TIFF::Rational"
330 26 2 if ($xres and $yres)
331 25 1 $xres == $yres ? :
333 26 2 if $unit and $unit ne "pixels"