Branch Coverage

lib/IOMux/Pipe/Write.pm
Criterion Covered Total %
branch 10 20 50.0


line true false branch
27 0 3 unless my $command = $args->{'command'}
29 3 0 ref $command eq 'ARRAY' ? :
33 0 3 unless pipe $rh, $wh
37 0 3 unless defined $pid
40 1 2 if ($pid == 0)
43 0 1 unless CORE::open STDIN, '<&', $rh
48 0 0 unless exec $cmd, @cmdopts
69 0 2 unless pipe $rh, $wh
84 0 0 ref $cmd eq 'ARRAY' ? :
99 2 2 unless my $pid = $self->{'IMPW_pid'}