| line |
true |
false |
branch |
|
139
|
21 |
133 |
if (exists $args{'filename'}) |
|
142
|
0 |
154 |
if (exists $args{'compression'}) |
|
145
|
0 |
154 |
if (exists $args{'compression_level'}) |
|
162
|
14228 |
26 |
if (exists *$self->{'mode'}) { } |
|
163
|
14228 |
0 |
if *$self->{'mode'} eq $mode |
|
172
|
0 |
26 |
if ($mode eq 'w') { } |
|
|
26 |
0 |
elsif ($mode eq 'r') { } |
|
205
|
9 |
9557 |
if wantarray |
|
211
|
133 |
0 |
if (scalar @_ == 2) { } |
|
214
|
25 |
108 |
if ($mode eq '>') { } |
|
|
108 |
0 |
elsif ($mode eq '<') { } |
|
232
|
129 |
0 |
if (defined *$self->{'file'}) { } |
|
233
|
127 |
2 |
if *$self->{'file'}->opened |
|
243
|
0 |
0 |
if defined *$self->{'file'} |
|
251
|
5 |
0 |
if defined *$self->{'file'} |
|
257
|
0 |
0 |
if defined *$self->{'file'} |
|
263
|
0 |
0 |
if defined *$self->{'file'} |
|
269
|
11 |
0 |
if defined *$self->{'file'} |
|
288
|
0 |
0 |
if ($method ne 'none' and $method ne 'auto') |
|
319
|
0 |
154 |
if (defined $add_comp_ext) |
|
323
|
0 |
154 |
if (*$self->{'add_comp_ext'} and $filename =~ /\.$comp_ext_regex$/) |
|
342
|
0 |
340 |
if (*$self->{'add_comp_ext'}) { } |
|
343
|
0 |
0 |
if ($comp eq 'auto') { } |
|
|
0 |
0 |
elsif ($comp eq 'none') { } |
|
369
|
0 |
159 |
if ($comp eq 'none') { } |
|
|
159 |
0 |
elsif ($comp eq 'auto') { } |
|
373
|
14 |
145 |
if $comp |
|
387
|
5 |
0 |
if exists *$self->{'file'} |
|
397
|
0 |
25 |
if exists *$self->{'mode'} |
|
399
|
9 |
16 |
if ($self->use_compression) { } |
|
403
|
0 |
16 |
unless open $filehandle, '>', $self->get_filename |
|
415
|
0 |
134 |
if exists *$self->{'mode'} |
|
417
|
5 |
129 |
if ($self->use_compression) { } |
|
422
|
0 |
129 |
unless open $filehandle, '<', $self->get_filename |
|
433
|
3 |
126 |
if (*$self->{'allow_sigpipe'}) |
|
435
|
0 |
0 |
unless ($? == 0 or POSIX::WIFSIGNALED($?) and POSIX::WTERMSIG($?) == 13) |