Branch Coverage

blib/lib/Image/ExifTool/InDesign.pm
Criterion Covered Total %
branch 49 114 42.9


line true false branch
41 0 5 unless $raf->Read($hdr, 16) == 16
42 0 5 unless $hdr eq $masterPageGUID
43 0 5 unless $raf->Read($buff, 8) == 8
44 5 0 $buff eq 'DOCUMENT' ? :
47 0 5 unless $raf->Seek(0, 0)
48 0 5 unless ($raf->Read($buff, 4096) == 4096 and $raf->Read($buf2, 4096) == 4096)
55 0 5 unless ($buf2 =~ /^\Q$masterPageGUID\E/)
62 0 5 $seq2 > $seq1 ? :
65 0 5 if ($streamInt32u == 1) { }
5 0 elsif ($streamInt32u == 2) { }
74 0 5 if $pages < 2
76 0 5 if ($pos > 2147483647 and not $et->Options("LargeFileSupport"))
80 2 3 if ($outfile) { }
84 0 2 unless &Write($outfile, $buff, $buf2)
86 0 2 unless ($result)
87 0 0 defined $result ? :
92 0 3 unless $raf->Seek($pos, 0)
98 0 10 unless $raf->Read($hdr, 32)
99 5 5 unless (length $hdr == 32 and $hdr =~ /^\Q$objectHeaderGUID\E/)
101 0 5 unless $hdr =~ /^\0+$/
105 0 5 if ($verbose)
107 0 0 if ($verbose > 2)
108 0 0 $len < 1024000 ? :
109 0 0 unless $raf->Seek(-$raf->Read($buff, $len2), 1)
115 5 0 if ($len > 56) { }
116 0 5 unless $raf->Read($buff, 56) == 56
117 5 0 if ($buff =~ /^(....)<\?xpacket begin=(['"])\xef\xbb\xbf\2 id=(['"])W5M0MpCehiHzreSzNTczkc9d\3/s) { }
124 0 5 if ($len > 314572800)
126 0 0 if ($outfile) { }
0 0 elsif ($et->Options('IgnoreMinorErrors')) { }
127 0 0 if $et->Error($msg, 2)
137 0 5 unless ($raf->Seek(-52, 1) and $raf->Read($buff, $len) == $len)
148 0 5 unless ($xmpLen == $len)
149 0 0 if ($xmpLen < $len) { }
156 2 3 if ($outfile) { }
157 0 2 if $err
160 0 2 unless $classID & 1073741824
162 2 0 if ($xmp and length $xmp) { }
170 0 0 if defined $xmp
184 2 3 if ($outfile) { }
0 3 elsif ($len) { }
186 0 2 unless &Write($outfile, $hdr, $buff)
188 0 2 unless ($result)
189 0 0 defined $result ? :
195 0 0 unless $raf->Seek($len, 1)
197 0 5 unless $raf->Read($buff, 32) == 32
198 0 5 unless ($buff =~ /^\Q$objectTrailerGUID\E/)
202 2 3 if ($outfile)
204 0 2 unless substr($hdr, 16, 8) eq substr($buff, 16, 8)
206 0 2 unless &Write($outfile, $objectTrailerGUID, substr($hdr, 16))
210 2 3 if ($outfile)
214 2 0 if $part
217 5 0 if (not $err) { }
0 0 elsif (not $outfile) { }
0 0 elsif ($err ne '1') { }
218 0 5 if $outfile and not $foundXMP
222 0 0 unless $err eq 1