line |
true |
false |
branch |
172
|
0 |
11 |
unless (substr($$dataPt, $pos, 4) eq "~FL\0") |
179
|
0 |
11 |
if ($pos > $dirLen) |
183
|
2 |
9 |
unless $tagTablePtr->{$tag} |
184
|
0 |
9 |
unless my $tagInfo = $et->GetTagInfo($tagTablePtr, $tag) |
186
|
8 |
1 |
unless ($tagInfo->{'Name'} eq "EXIFInfo") |
198
|
0 |
1 |
unless $len > 14 and substr($$dataPt, $pos - $len, 6) eq "Exif\0\0" |
199
|
0 |
1 |
unless &SetByteOrder(substr($$dataPt, $start + 6, 2)) |
231
|
0 |
1 |
unless $raf->Read($buff, 32) == 32 and $buff eq "Paint Shop Pro Image File\n\32\0\0\0\0\0" and $raf->Read($buff, 4) == 4 |
239
|
1 |
0 |
$a[0] > 3 ? : |
245
|
1 |
5 |
unless $raf->Read($buff, $hlen) == $hlen |
246
|
0 |
5 |
unless ($buff =~ /^~BK\0/) |
253
|
2 |
3 |
unless ($tagTablePtr->{$tag}) |
254
|
0 |
2 |
unless $raf->Seek($len, 1) |
257
|
0 |
3 |
unless $raf->Read($buff, $len) == $len |
264
|
0 |
1 |
if $err |