| line |
true |
false |
branch |
|
39
|
0 |
169 |
unless $got->parse(\%PARAMS, @_) |
|
48
|
0 |
256 |
if defined $_[0] |
|
69
|
0 |
0 |
if $Archive::Zip::SimpleUnzip::Config{'lseeksize'} >= 8 |
|
76
|
1 |
172 |
unless @_ |
|
82
|
1 |
171 |
unless (defined $inValue) |
|
90
|
114 |
57 |
if ($inType eq 'filename') { } |
|
|
57 |
0 |
elsif ($inType eq 'buffer' or $inType eq 'handle') { } |
|
92
|
1 |
113 |
if (-e $inValue and not -f _ && -r _) |
|
97
|
1 |
112 |
unless $fh = "IO::File"->new("<$inValue") |
|
117
|
0 |
169 |
unless $inner->_create(undef, 0, $fh) |
|
208
|
0 |
591 |
unless defined $name |
|
213
|
252 |
339 |
unless defined $member |
|
227
|
0 |
0 |
unless defined $member |
|
248
|
0 |
1 |
unless my $member = $self->member($name) |
|
251
|
1 |
0 |
defined $out ? : |
|
278
|
168 |
253 |
unless my $member = $self->member($name) |
|
295
|
168 |
169 |
wantarray ? : |
|
301
|
85 |
426 |
if $self->{'Cursor'} >= @{$self->{'CD'};} |
|
339
|
0 |
169 |
unless my $magic = $self->ckMagic |
|
374
|
0 |
589 |
unless $self->smartReadExact(@_) |
|
395
|
0 |
169 |
unless defined $offset |
|
397
|
0 |
169 |
if $entries == 0 |
|
419
|
846 |
0 |
if ($filename_length) |
|
421
|
0 |
846 |
unless $self->smartReadExact(\$filename, $filename_length) |
|
426
|
0 |
846 |
if ($extra_length) |
|
428
|
0 |
0 |
unless $self->smartReadExact(\$extraField, $extra_length) |
|
433
|
0 |
0 |
if ($zip64Extended) |
|
435
|
0 |
0 |
if ($uncompressedLength == 4294967295) |
|
440
|
0 |
0 |
if ($compressedLength == 4294967295) |
|
445
|
0 |
0 |
if ($locHeaderOffset == 4294967295) |
|
454
|
84 |
336 |
if $filesOnly and substr($filename, -1, 1) eq "/" and $uncompressedLength == 0 |
|
456
|
168 |
594 |
if ($comment_length) |
|
458
|
0 |
168 |
unless $self->smartReadExact(\$comment, $comment_length) |
|
500
|
84 |
0 |
if (unpack("V", $buffer) == 117853008) |
|
508
|
84 |
0 |
if (unpack("V", $buffer) == 101075792) |
|
550
|
85 |
84 |
if (unpack('V', $buffer) == 101010256) { } |
|
563
|
84 |
0 |
if ($seekTo < 0) |
|
573
|
84 |
0 |
if ($pos >= 0) |
|
580
|
84 |
0 |
if $comment_length |
|
587
|
0 |
0 |
if $want == $fileLen |
|
591
|
84 |
85 |
if $entries and U64::full32($centralDirOffset) |
|
685
|
252 |
589 |
if $self->{'NeedsReset'} |
|
710
|
84 |
174 |
if $self->{'NeedsReset'} |
|
776
|
2 |
6 |
if (defined $out) { } |
|
784
|
0 |
6 |
defined $out ? : |
|
788
|
2 |
6 |
$self->isDirectory ? : |
|
790
|
8 |
0 |
if (defined $path) |
|
793
|
0 |
8 |
if -e $path and not -d $path |
|
796
|
4 |
4 |
unless (-d $path) |
|
799
|
0 |
4 |
unless File::Path::mkpath($path, {"error", \$error}) |
|
806
|
6 |
2 |
if ($self->isFile) |
|
809
|
0 |
6 |
unless my $fh = "IO::File"->new(">$filename") |
|
838
|
258 |
0 |
if ref $_[0] |
|
865
|
90 |
258 |
unless *$self->{'Open'} |
|
872
|
258 |
0 |
if (defined *$self->{'SZ'}) |
|
885
|
0 |
599 |
unless $self->_stdPreq |
|
894
|
0 |
599 |
if $status < 0 |
|
901
|
0 |
84 |
unless $self->_stdPreq |
|
908
|
0 |
1008 |
unless $self->_stdPreq |
|
916
|
0 |
672 |
unless $self->_stdPreq |
|
929
|
0 |
0 |
unless defined defined *$self->{'SZ'} and *$self->{'Inner'}{'Open'} |
|
933
|
0 |
0 |
unless *$self->{'Open'} |
|
936
|
0 |
0 |
if *$self->{'SZ'}{'Error'} |