Branch Coverage

blib/lib/Env/Modify.pm
Criterion Covered Total %
branch 41 62 66.1


line true false branch
55 2 5 if ($tags{':qx'} or $tags{':backticks'} or $tags{':all'}) { }
1 4 elsif ($tags{':readpipe'}) { }
70 2 5 if ($tags{':system'} or $tags{':all'})
74 1 6 if ($tags{':chdir'})
78 0 49 if ($tags{":$shell"})
82 3 4 if ($cgreadpipe) { }
104 1 0 @_ > 1 ? :
110 4 31 @cmd > 1 ? :
120 6 20 if (-s $stderr)
127 4 22 if (-s $stdout)
136 3 23 if $CHDIR
142 0 3 if ($SHELL eq 'tcsh') { }
0 3 elsif ($SHELL eq 'csh') { }
0 3 elsif ($SHELL eq 'ksh') { }
160 0 21 if ($_RT115330)
161 0 0 if (not $cmd =~ /"/) { }
166 0 0 if ($cmd eq '00') { }
0 0 elsif (not $cmd =~ /\Q$delim\E/) { }
186 0 21 wantarray ? :
191 9 12 if (-s $stderr)
201 1 20 if $CHDIR
203 0 21 wantarray ? :
213 1 46 if ($status > 128) { }
222 0 12 unless @in
225 0 37 if (not defined $_ or $_ eq '')
230 0 37 if s/\x00//g
232 0 37 if (/=/) { }
233 0 0 unless $saw_non_equal
237 12 25 if m[[^\w!%+,\-./:=\@^]]
238 12 25 if ($escape or not $saw_non_equal and /=/)
252 0 12 if (@err)