Branch Coverage

blib/lib/Image/MetaData/JPEG/dumpers/app1_exif.pl
Criterion Covered Total %
branch 54 62 87.1


line true false branch
34 106 55 defined $this->search_record('IFD1') ? :
42 82 79 if (my $th_record = $this->search_record('ThumbnailData'))
62 158 4 $endianness eq $Image::MetaData::JPEG::Segment::BIG_ENDIAN ? :
88 0 630 unless defined $next
93 55 575 unless $dirref
97 564 11 $$this{'endianness'} eq $Image::MetaData::JPEG::Segment::BIG_ENDIAN ? :
98 564 11 $$this{'endianness'} eq $Image::MetaData::JPEG::Segment::BIG_ENDIAN ? :
108 395 6851 if $$_{'type'} == $Image::MetaData::JPEG::Segment::REFERENCE
123 575 0 unless $next == 2
127 82 493 if ($dirnames eq 'IFD1' and my $th_record = $this->search_record('ThumbnailData'))
132 72 92 if $th_len
139 572 3 exists $Image::MetaData::JPEG::Segment::IFD_SUBDIRS{$path} ? :
149 2475 4768 if $record->get_category eq 'S'
156 72 7171 if ($dirnames eq 'IFD1' and exists $th_tags{$tag}) { }
392 6779 elsif ($mapping and exists $$mapping{$tag}) { }
3485 3294 elsif ($length <= 4) { }
169 87 305 $is_makernote ? :
172 87 305 if $is_makernote
190 106 469 if $next == 0
191 469 106 if $next == 1
197 1078 72 unless my $overwrite = $th_tags{$_}
222 0 87 unless $dirref and $spcref
228 0 87 unless $format
231 2 85 if ($format =~ /unknown/ or defined $error)
232 0 2 unless $data
236 0 85 unless defined $signature and $endianness
239 0 85 exists $$hash{'nonext'} ? :
243 1 84 exists $$hash{'mkntstart'} ? :
249 1 84 if (exists $$hash{'mkntTIFF'})
252 0 1 if $endianness ne $TIFF_endianness
256 82 3 if (exists $$hash{'nonIFD'}) { }