Branch Coverage

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


line true false branch
31 0 3 unless my $command = $args->{'command'}
33 3 0 ref $command eq 'ARRAY' ? :
37 0 3 unless pipe $rh, $wh
41 0 3 unless defined $pid
44 1 2 if ($pid == 0)
47 0 1 unless CORE::open STDIN, '<&', $rh
52 0 0 unless exec $cmd, @cmdopts
73 0 2 unless pipe $rh, $wh
88 0 0 ref $cmd eq 'ARRAY' ? :
103 2 2 unless my $pid = $self->{'IMPW_pid'}