| line |
true |
false |
branch |
|
41
|
1 |
0 |
unless exists $arg{$arg} |
|
201
|
86 |
374 |
ref $_ eq 'HASH' ? : |
|
207
|
10 |
76 |
exists $System::Command::a->{'env'} && exists $System::Command::b->{'env'} ? : |
|
215
|
0 |
130 |
if $o->{'trace'} |
|
216
|
0 |
130 |
if @trace |
|
220
|
7 |
123 |
defined $o->{'cwd'} ? : |
|
221
|
7 |
123 |
if (defined $dest) |
|
222
|
1 |
6 |
unless chdir $dest |
|
229
|
35 |
94 |
if (exists $o->{'env'}) |
|
238
|
0 |
129 |
if ($o->{'interactive'}) |
|
239
|
0 |
0 |
unless -t STDIN |
|
267
|
1 |
99 |
unless (defined $pid) |
|
268
|
0 |
1 |
if $trace |
|
273
|
0 |
99 |
if $trace |
|
276
|
5 |
94 |
if (defined $o->{'input'}) |
|
279
|
5 |
0 |
if $System::Command::Config{'sig_name'} =~ /\bPIPE\b/ |
|
280
|
3 |
2 |
if length $o->{'input'} |
|
285
|
5 |
94 |
if (defined $dest) |
|
286
|
0 |
5 |
unless chdir $orig |
|
321
|
5 |
1 |
if ($args{$which}) { } |
|
323
|
0 |
5 |
if &reftype($args{$which}) ne "CODE" |
|
331
|
0 |
3 |
unless (ref $self) |
|
333
|
0 |
0 |
unless exists $args{'command'} |
|
341
|
0 |
3 |
if exists $args{'input_record_separator'} |
|
346
|
13 |
12 |
$fh == $self->stdout ? : |
|
347
|
21 |
4 |
if (defined(my $line = readline $fh)) { } |
|
350
|
17 |
4 |
if exists $args{$which} |
|
351
|
1 |
20 |
unless $ret |
|
371
|
0 |
333 |
$_[0]{'options'}{'interactive'} ? : |
|
375
|
69 |
0 |
unless $_[0]{'options'}{'interactive'} |