Branch Coverage

blib/lib/System2.pm
Criterion Covered Total %
branch 29 58 50.0


line true false branch
41 0 2 if ($#args % 2)
45 0 0 if (exists $param{'args'} and ref $param{'args'} eq "ARRAY")
49 0 0 exists $param{'arg0'} ? :
55 2 0 unless ($named_param_check)
57 0 2 if (ref $args[0] eq 'ARRAY') { }
66 0 2 unless pipe P_IN, C_IN
67 0 2 unless pipe C_OUT, P_OUT
68 0 2 unless pipe C_ERR, P_ERR
79 0 4 unless fcntl $_, 3, $ret
81 0 4 unless fcntl $_, 4, $ret
90 0 2 if $System2::debug
93 0 2 defined $SIG{'CHLD'} ? :
97 0 2 unless defined $pid
99 1 1 unless $pid
111 0 1 if $System2::debug
114 0 1 unless close C_IN
115 0 1 unless close C_OUT
116 0 1 unless close C_ERR
118 0 1 unless open STDOUT, ">&P_OUT"
119 0 1 unless open STDERR, ">&P_ERR"
145 0 1 unless close P_IN
146 0 1 unless close P_OUT
147 0 1 unless close P_ERR
157 0 3 if ($nfound == -1)
162 6 0 if (vec $rout, $fn{$_}, 1)
170 0 3 unless (defined $read)
171 0 3 if ($read == 0)
173 0 3 if $System2::debug
185 1 2 if $child == -1