| blib/lib/Command/Run.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 13 | 18 | 72.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 130 | 112 | 2 | 61 | $opt{'nofork'} and ref $command[0] eq "CODE" |
| line | l | !l | condition |
|---|---|---|---|
| 72 | 195 | 0 | $obj->{'COMMAND'} // [] |
| 110 | 152 | 0 | $obj->{'RESULT'}{'data'} // "" |
| 134 | 21 | 93 | $opt{'stderr'} // "" |
| 138 | 11 | 0 | pipe my $stderr_r, my $stderr_w or die "pipe: $!\n" |
| 140 | 114 | 0 | fork // die("fork: $!\n") |
| 221 | 12 | 49 | $opt{'stderr'} // "" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 206 | 10 | 104 | 0 | $obj->{$key} //= do { die "tmpfile: $!\n" unless my $f = "IO::File"->new_tmpfile; binmode $f, $opt{'raw'} ? ":utf8" : ":encoding(utf8)"; $f } |