| line |
true |
false |
branch |
|
53
|
9 |
0 |
_STRING($_[0]) && exists $$Archive::Builder::Archive::support{$_[0]} ? : |
|
54
|
0 |
9 |
unless my $Source = _CAN(shift(), '_archive_content') |
|
57
|
0 |
9 |
unless ($$Archive::Builder::Archive::support{$type}) |
|
63
|
0 |
9 |
unless ($Source->file_count > 0) |
|
69
|
0 |
9 |
unless $files |
|
76
|
0 |
9 |
unless $modes |
|
110
|
0 |
4 |
unless @files |
|
116
|
10 |
5 |
if (defined $parts and $this >= $parts) |
|
129
|
4 |
4 |
unless $$self{'generated'} |
|
141
|
1 |
3 |
if ($$self{'type'} eq 'zip') { } |
|
|
1 |
2 |
elsif ($$self{'type'} eq 'tar') { } |
|
|
1 |
1 |
elsif ($$self{'type'} eq 'tar.gz') { } |
|
|
1 |
0 |
elsif ($$self{'type'} eq 'tgz') { } |
|
161
|
4 |
0 |
unless ($filename =~ /\.$type$/) |
|
166
|
0 |
4 |
unless ('File::Flat'->canWrite($filename)) |
|
172
|
0 |
4 |
unless ($contents) |
|
177
|
0 |
4 |
unless ('File::Flat'->write($filename, $contents)) |
|
209
|
4 |
0 |
if ($$modes{$path}) |
|
216
|
0 |
1 |
unless ($Archive->writeToFileHandle($handle) == Archive::Zip::AZ_OK()) |
|
227
|
0 |
3 |
unless ($Archive) |
|
237
|
12 |
0 |
if ($$modes{$path}) |
|
248
|
3 |
0 |
$string ? : |
|
255
|
0 |
2 |
unless my $tar = $self->_tar |
|
259
|
2 |
0 |
$compressed ? : |
|
279
|
9 |
0 |
defined $_[0] && &Scalar::Util::blessed($_[0]) && $_[0]->can($_[1]) ? : |