| line |
true |
false |
branch |
|
27
|
13 |
12 |
'Archive::Builder'->_check('name', $_[0]) ? : |
|
44
|
38 |
8 |
unless @_ |
|
47
|
3 |
5 |
'Archive::Builder'->_relative_path($_[0]) ? : |
|
59
|
0 |
0 |
unless (defined $File->contents) |
|
75
|
0 |
4 |
unless ('File::Flat'->canWrite($base)) |
|
82
|
0 |
12 |
unless ($File->save($filename)) |
|
98
|
0 |
0 |
if ($self->Builder) |
|
134
|
0 |
35 |
unless my $contents = $File->contents |
|
148
|
8 |
27 |
$$File{'executable'} ? : |
|
166
|
11 |
26 |
unless my $File = 'Archive::Builder::File'->new(@_) |
|
170
|
21 |
5 |
$self->add_file($File) ? : |
|
176
|
5 |
28 |
unless my $File = _INSTANCE(shift(), 'Archive::Builder::File') |
|
180
|
5 |
23 |
unless ($self->_no_path_clashes($File->path)) |
|
194
|
1 |
1 |
%{$_[0]{'zfiles'};} ? : |
|
203
|
12 |
1 |
defined $_[1] ? : |
|
208
|
3 |
1 |
defined $_[0] ? : |
|
209
|
1 |
2 |
unless my $File = $$self{'zfiles'}{$name} |
|
235
|
3 |
29 |
if ($path eq $_) |
|
247
|
1 |
28 |
if ($_ =~ /^$path$directory_seperator/) |
|
253
|
1 |
27 |
if ($path =~ /$_$directory_seperator/) |