Branch Coverage

blib/lib/System2.pm
Criterion Covered Total %
branch 30 58 51.7


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 254 if ($nfound == -1)
162 435 73 if (vec $rout, $fn{$_}, 1)
170 0 1968 unless (defined $read)
171 0 1968 if ($read == 0)
173 0 1968 if $System2::debug
185 1 253 if $child == -1