Branch Coverage

blib/lib/PerlX/bash.pm
Criterion Covered Total %
branch 67 70 95.7


line true false branch
35 7 156 if &any(sub { &$_($arg); } , @AUTOQUOTE)
36 17 139 if $arg =~ /^$BASH_SPECIAL_CHARS/
37 5 134 if $arg =~ /$BASH_REDIRECTION/
38 36 98 if $arg =~ /$BASH_SPECIAL_CHARS/
46 1 163 unless defined $arg
47 43 120 if &_should_quote()
62 33 14 if (ref $arg) { }
5 9 elsif ($arg eq '-c') { }
8 1 elsif ($arg eq '-e') { }
64 1 32 if $capture
70 2 3 unless length $dash_c_cmd
81 3 57 if (defined $dash_c_cmd) { }
83 1 2 if @_
87 4 53 unless @_
88 1 2 if @_ == 1 and $_[0] and $_[0] =~ /\s/
92 12 43 if ref $_[-1] eq 'CODE'
93 1 54 if $capture and $filter
99 2 52 $dash_c_cmd ? :
102 28 25 if ($capture) { }
11 14 elsif ($filter) { }
105 27 1 unless defined $IFS
108 21 6 if ($capture eq 'string') { }
2 4 elsif ($capture eq 'lines') { }
3 1 elsif ($capture eq 'words') { }
116 1 1 wantarray ? :
121 2 1 wantarray ? :
130 2 9 unless $cmd[-1] =~ s/\s*(?
131 3 6 if $1
136 0 9 unless defined $pid
138 6 3 if ($pid) { }
146 1 5 unless (close CHILD)
155 0 0 unless exec @cmd
187 3 4 $num < 0 ? :
194 1 6 unless $num
195 3 3 $num < 0 ? :