line |
true |
false |
branch |
29
|
2 |
0 |
if (@commands == grep({can_run($_);} @commands)) |
33
|
2 |
0 |
if (is_testing()) |
46
|
0 |
0 |
if (defined $tar) |
60
|
0 |
0 |
if (is_testing()) { } |
62
|
0 |
0 |
if (defined $tar) |
66
|
0 |
0 |
unless say $self->_format_file($file) |
112
|
7 |
6 |
if ($tarfile->mtime > $last_modification) |
141
|
7 |
0 |
if (defined $tarfile) |
157
|
6 |
0 |
if (defined $tarfile) |
169
|
0 |
1 |
unless opendir my $dh, $dir |
172
|
2 |
1 |
if $entry eq "." or $entry eq ".." |
177
|
0 |
1 |
if -l $path |
181
|
0 |
1 |
if (-d $path) |
199
|
1 |
0 |
if (chdir $stagingdir) |
209
|
5 |
7 |
if ($is_doc{$type}) { } |
210
|
1 |
4 |
if ($is_first) |
218
|
1 |
4 |
if (-d $path) |
227
|
0 |
1 |
unless (chdir $origdir) |
244
|
0 |
0 |
$file->{'name'} =~ m[/\z]msux ? : |
|
0 |
0 |
$file->{'mode'} & 73 ? : |