Branch Coverage

blib/lib/Archive/Zip/ZipFileMember.pm
Criterion Covered Total %
branch 68 120 56.6


line true false branch
25 120 0 @_ ? :
26 120 0 @_ ? :
58 128 0 unless defined $where
61 0 128 if defined $previousWhere and $where == $previousWhere
68 0 128 unless $status
73 0 128 if $status == 4
76 0 0 if ($status == 3 and $self->{'possibleEocdOffset'})
81 0 0 if ($status == 0)
99 0 15 if ref $self eq $newClass
103 15 0 if (_isSeekable($self->fh))
106 15 0 if $status == 0
108 0 15 unless $status == 0
139 0 113 if ($bytesRead != 26)
157 113 0 if ($fileNameLength)
158 0 113 unless $self->fh->seek($fileNameLength, 1)
163 34 79 if ($extraFieldLength)
166 0 34 if ($bytesRead != $extraFieldLength)
169 23 11 if ($self->{'archiveZip64'})
173 0 23 if $status != 0
180 16 97 if ($bitFlag & 8)
187 0 16 unless $self->fh->seek($self->{'compressedSize'}, 1)
196 0 16 unless $status == 0
201 2 14 if $self->isEncrypted and $oldUncompressedSize > $self->{'uncompressedSize'}
207 0 16 if $oldCrc32 != $self->{'crc32'} or $oldUncompressedSize != $self->{'uncompressedSize'}
209 6 10 if $self->compressionMethod == 0
227 0 15 if ($bytesRead != 26)
243 15 0 if ($fileNameLength)
246 0 15 if ($bytesRead != $fileNameLength)
253 8 7 if ($extraFieldLength)
256 0 8 if ($bytesRead != $extraFieldLength)
259 2 6 if ($self->{'archiveZip64'})
265 0 2 if $status != 0
272 2 13 if ($self->hasDataDescriptor) { }
278 0 2 unless $self->fh->seek($self->{'compressedSize'}, 1)
282 0 2 unless $status == 0
287 0 13 if $self->{'crc32'} != $crc32 or $self->{'uncompressedSize'} != $uncompressedSize
292 0 15 wantarray ? :
315 0 18 if $bytesRead != 4
323 18 0 if (not $zip64) { }
337 18 0 if ($signature == 134695760 and $signature != $self->{'crc32'}) { }
340 0 18 if $bytesRead != $dataDescriptorLength
347 0 0 if $bytesRead != $dataDescriptorLengthNoSig
356 0 18 unless defined $self->{'eocdCrc32'}
372 0 72 if ($bytesRead != 42)
397 71 1 if ($fileNameLength)
399 0 71 if ($bytesRead != $fileNameLength)
403 21 51 if ($extraFieldLength)
405 0 21 if ($bytesRead != $extraFieldLength)
408 8 13 if ($self->{'archiveZip64'})
415 0 8 if $status != 0
419 0 72 if ($fileCommentLength)
421 0 0 if ($bytesRead != $fileCommentLength)
427 2 70 if ($self->{'uncompressedSize'} != $self->{'compressedSize'} and $self->{'compressionMethod'} == 0)
441 0 113 unless $status == 0
443 0 113 unless $self->fh
451 0 113 unless $status == 0
455 0 113 unless $status == 0
458 0 113 unless $self->fh->seek($self->dataOffset, 0)
469 0 100 unless $chunkSize
470 0 100 unless my $bytesRead = $self->fh->read($$dataRef, $chunkSize)