| line |
true |
false |
branch |
|
92
|
3 |
202 |
if (@_ == 1) |
|
94
|
0 |
3 |
if 'HASH' eq ref $_[0] |
|
97
|
0 |
3 |
if 'ARRAY' eq ref $_[0] and @{$_[0];} == 2 |
|
117
|
133 |
72 |
unless defined $opc->{'type'} |
|
126
|
4 |
68 |
if ($self->strict) |
|
128
|
2 |
2 |
if $self->requires_file and not $self->has_file |
|
132
|
0 |
2 |
if not $self->requires_file and $self->has_file |
|
151
|
4 |
0 |
if (defined $N) { } |
|
156
|
0 |
4 |
unless open $N, $op, $file |
|
167
|
0 |
0 |
unless my $nfd = POSIX::open($file, $op, 420) |
|
169
|
0 |
0 |
unless POSIX::dup2($nfd, $N) |
|
188
|
0 |
0 |
if (defined $N) { } |
|
191
|
0 |
0 |
unless open $N, '>&', $M |
|
203
|
0 |
0 |
unless POSIX::dup2($N, $M) |
|
228
|
0 |
0 |
if (defined $N) { } |
|
230
|
0 |
0 |
unless close $N |
|
239
|
0 |
0 |
unless POSIX::close($N) |