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:\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) |