| line |
true |
false |
branch |
|
23
|
0 |
4 |
@_ == 1 ? : |
|
25
|
4 |
0 |
if (exists $opts{'path'}) { } |
|
26
|
0 |
4 |
unless -x $opts{'path'} |
|
33
|
0 |
0 |
unless -x $candidate |
|
37
|
0 |
0 |
unless -x $opts{'path'} |
|
51
|
5 |
4 |
unless @_ |
|
53
|
2 |
2 |
unless @_ == 2 and ref $_[1] eq 'HASH' |
|
58
|
2 |
0 |
ref $$h{$_} ? : |
|
66
|
0 |
0 |
unless open my $fh, '-|', $self->path, $self->command_line(@_) |
|
74
|
0 |
0 |
if wantarray |
|
80
|
0 |
0 |
unless open my $fh, '|-', $self->path, $self->command_line(@_) |
|
90
|
0 |
0 |
unless defined $pid |
|
91
|
0 |
0 |
if $pid |
|
93
|
0 |
0 |
unless exec do {
$self->path
} $self->path, $self->command_line(@_) |
|
128
|
0 |
1 |
@_ == 1 ? : |