Branch Coverage

blib/lib/Process/Pipeline.pm
Criterion Covered Total %
branch 39 64 60.9


line true false branch
19 121 98 if (@arg)
20 0 121 if (ref $arg[0] eq 'CODE') { }
30 10 63 if ($key)
31 0 10 unless $SUPPORT_SET{$key}
67 18 10 if @_
75 367 58 if ($pid == 0) { }
0 58 elsif ($pid == -1) { }
81 0 58 unless ($found)
88 18 0 if (my $filename = delete $self->{'_filename'})
119 34 12 if $_ != $i - 1
127 23 0 if ($i == $n and not $process->set->{'>'} and not $process->set->{'>>'})
131 0 98 unless defined $pid
132 17 81 if ($pid == 0)
133 5 12 if ($main_out_filename)
135 0 5 unless open STDOUT, '>>', $main_out_filename
138 12 5 $i - 1 >= 0 ? :
140 12 5 if ($read)
145 12 5 if ($write)
152 0 17 if (my $in = $set{'<'})
153 0 0 unless open STDIN, '<', $in
155 0 17 if (my $out = $set{'>'} or my $append = $set{'>>'})
156 0 0 defined $out ? :
157 0 0 defined $out ? :
158 0 0 unless open STDOUT, $mode, $file
160 1 16 if (my $out = $set{'2>'} or my $append = $set{'2>>'})
161 1 0 defined $out ? :
162 1 0 defined $out ? :
163 0 1 unless open STDERR, $mode, $file
165 0 17 if (exists $set{'2>&1'})
171 0 17 if (ref $cmd eq 'CODE') { }
187 18 0 if ($main_out_filename)
191 18 0 unless $option{'async'}