Branch Coverage

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


line true false branch
56 2 5 if ($tags{':qx'} or $tags{':backticks'} or $tags{':all'}) { }
1 4 elsif ($tags{':readpipe'}) { }
71 2 5 if ($tags{':system'} or $tags{':all'})
75 1 6 if ($tags{':chdir'})
79 0 49 if ($tags{":$shell"})
83 3 4 if ($cgreadpipe) { }
107 1 0 @_ > 1 ? :
113 4 31 @cmd > 1 ? :
123 6 20 if (-s $stderr)
130 4 22 if (-s $stdout)
139 3 23 if $CHDIR
145 0 3 if ($SHELL eq 'tcsh') { }
0 3 elsif ($SHELL eq 'csh') { }
0 3 elsif ($SHELL eq 'ksh') { }
163 0 21 if ($_RT115330)
164 0 0 if (not $cmd =~ /"/) { }
169 0 0 if ($cmd eq '00') { }
0 0 elsif (not $cmd =~ /\Q$delim\E/) { }
189 0 21 wantarray ? :
194 9 12 if (-s $stderr)
204 1 20 if $CHDIR
206 0 21 wantarray ? :
216 1 46 if ($status > 128) { }
225 0 12 unless @in
228 0 37 if (not defined $_ or $_ eq '')
233 0 37 if s/\x00//g
235 0 37 if (/=/) { }
236 0 0 unless $saw_non_equal
240 12 25 if m[[^\w!%+,\-./:=\@^]]
241 12 25 if ($escape or not $saw_non_equal and /=/)
255 0 12 if (@err)