| line | % | coverage | branch |
|---|
| 139 | 100 | T | F | if (exists $args{'filename'}) |
| 142 | 50 | T | F | if (exists $args{'compression'}) |
| 145 | 50 | T | F | if (exists $args{'compression_level'}) |
| 162 | 100 | T | F | if (exists *$self->{'mode'}) { } |
| 163 | 50 | T | F | if *$self->{'mode'} eq $mode |
| 172 | 50 | T | F | if ($mode eq 'w') { } |
| 50 | T | F | elsif ($mode eq 'r') { } |
| 205 | 100 | T | F | if wantarray |
| 211 | 50 | T | F | if (scalar @_ == 2) { } |
| 214 | 100 | T | F | if ($mode eq '>') { } |
| 50 | T | F | elsif ($mode eq '<') { } |
| 232 | 50 | T | F | if (defined *$self->{'file'}) { } |
| 233 | 100 | T | F | if *$self->{'file'}->opened |
| 243 | 0 | T | F | if defined *$self->{'file'} |
| 251 | 50 | T | F | if defined *$self->{'file'} |
| 257 | 0 | T | F | if defined *$self->{'file'} |
| 263 | 0 | T | F | if defined *$self->{'file'} |
| 269 | 50 | T | F | if defined *$self->{'file'} |
| 288 | 0 | T | F | if ($method ne "none" and $method ne "auto") |
| 319 | 50 | T | F | if (defined $add_comp_ext) |
| 323 | 50 | T | F | if (*$self->{'add_comp_ext'} and $filename =~ /\.$comp_ext_regex$/) |
| 342 | 50 | T | F | if (*$self->{'add_comp_ext'}) { } |
| 343 | 0 | T | F | if ($comp eq 'auto') { } |
| 0 | T | F | elsif ($comp eq 'none') { } |
| 369 | 50 | T | F | if ($comp eq 'none') { } |
| 50 | T | F | elsif ($comp eq 'auto') { } |
| 373 | 100 | T | F | if $comp |
| 387 | 50 | T | F | if exists *$self->{'file'} |
| 397 | 50 | T | F | if exists *$self->{'mode'} |
| 399 | 100 | T | F | if ($self->use_compression) { } |
| 403 | 50 | T | F | unless open $filehandle, ">", $self->get_filename |
| 415 | 50 | T | F | if exists *$self->{'mode'} |
| 417 | 100 | T | F | if ($self->use_compression) { } |
| 422 | 50 | T | F | unless open $filehandle, "<", $self->get_filename |
| 433 | 100 | T | F | if (*$self->{'allow_sigpipe'}) |
| 435 | 0 | T | F | unless ($? == 0 or POSIX::WIFSIGNALED($?) and POSIX::WTERMSIG($?) == 13) |