line |
true |
false |
branch |
24
|
2 |
58 |
if $error
|
29
|
48 |
10 |
if (defined $output or defined $error)
|
31
|
10 |
86 |
unless ref $_
|
32
|
17 |
79 |
if $_ != \(undef) and not defined $$_
|
49
|
56 |
2 |
if (not defined $output or $output != \(undef))
|
54
|
56 |
2 |
if (not defined $error or $error != \(undef))
|
55
|
20 |
36 |
$should_merge ? :
|
75
|
4 |
1 |
$exit == 0 ? :
|
77
|
4 |
1 |
wantarray ? :
|
86
|
4 |
1 |
$exit == 0 ? :
|
88
|
4 |
1 |
wantarray ? :
|
98
|
0 |
0 |
if (/[ \"]/)
|
116
|
1 |
59 |
if (defined $output and defined $error and defined $output_file and defined $error_file and $output == $error and $output != \(undef) and $output_file ne $error_file) { }
|
|
1 |
59 |
elsif (not defined $output || defined $error and defined $output_file and defined $error_file and $output_file ne $error_file) { }
|
143
|
0 |
110 |
if $^O eq 'MSWin32'
|
155
|
110 |
2 |
if (defined fileno $orig_fh and not _is_wperl())
|
157
|
0 |
110 |
unless open $saved_fh, ">&$orig_fh"
|
163
|
92 |
20 |
if (not $merge_fh) { }
|
165
|
19 |
73 |
if ($capture_file) { }
|
170
|
0 |
92 |
unless open $newio_fh, "+>$newio_file"
|
179
|
0 |
112 |
unless open $fhref, '>&' . fileno($newio_fh)
|
190
|
2 |
110 |
unless $pid eq $$
|
195
|
108 |
2 |
if (defined $saved_fh) { }
|
196
|
0 |
108 |
unless open $fh_ref, '>&' . fileno($saved_fh)
|
204
|
80 |
30 |
if (ref $capture_var and $newio_file)
|
212
|
90 |
20 |
if $newio_file
|
215
|
20 |
90 |
unless defined $newio_file and -e $newio_file
|
216
|
19 |
71 |
if $capture_file
|
217
|
0 |
71 |
unless unlink $newio_file
|