| line |
true |
false |
branch |
|
60
|
0 |
0 |
unless $self->brik_help_run_undef_arg("unzip", $input) |
|
64
|
0 |
0 |
unless my $lines = $self->capture($cmd) |
|
68
|
0 |
0 |
if (/^\s*(?:inflating|extracting):\s*([^\s]+)\s*$/) |
|
83
|
0 |
0 |
unless $self->brik_help_run_undef_arg("gunzip", $input) |
|
86
|
0 |
0 |
unless (defined $output) |
|
91
|
0 |
0 |
unless ($gz) |
|
95
|
0 |
0 |
unless my $fw = "Metabrik::File::Write"->new_from_brik_init($self) |
|
100
|
0 |
0 |
unless ($output =~ m[^/]) |
|
104
|
0 |
0 |
unless my $fd = $fw->open($output) |
|
112
|
0 |
0 |
unless (defined $r) |
|
119
|
0 |
0 |
unless ($no_error) |
|
134
|
0 |
0 |
unless $self->brik_help_run_undef_arg("uncompress", $input) |
|
135
|
0 |
0 |
unless $self->brik_help_run_file_not_found("uncompress", $input) |
|
137
|
0 |
0 |
unless my $ft = "Metabrik::File::Type"->new_from_brik_init($self) |
|
138
|
0 |
0 |
unless my $type = $ft->get_mime_type($input) |
|
140
|
0 |
0 |
if ($type eq 'application/gzip' or $type eq 'application/x-gzip') { } |
|
|
0 |
0 |
elsif ($type eq 'application/zip' or $type eq 'application/vnd.oasis.opendocument.text' or $type eq 'application/java-archive') { } |
|
|
0 |
0 |
elsif ($type eq 'application/x-bzip2') { } |
|
160
|
0 |
0 |
unless $self->brik_help_run_undef_arg("gzip", $input) |
|
161
|
0 |
0 |
unless $self->brik_help_run_file_not_found("gzip", $input) |
|
165
|
0 |
0 |
unless $self->execute($cmd) |
|
177
|
0 |
0 |
unless $self->brik_help_run_undef_arg("bzip2", $input) |
|
180
|
0 |
0 |
unless (defined $output) |
|
186
|
0 |
0 |
unless my $lines = $self->capture($cmd) |
|
198
|
0 |
0 |
unless $self->brik_help_run_undef_arg("bunzip2", $input) |
|
201
|
0 |
0 |
unless (defined $output) |
|
207
|
0 |
0 |
unless my $lines = $self->capture($cmd) |