Branch Coverage

blib/lib/IO/CaptureOutput.pm
Criterion Covered Total %
branch 50 58 86.2


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