Branch Coverage

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


line true false branch
36 7 161 if &any(sub { &$_($arg); } , @AUTOQUOTE)
37 19 142 if $arg =~ /^$BASH_SPECIAL_CHARS/
38 6 136 if $arg =~ /$BASH_REDIRECTION/
39 36 100 if $arg =~ /$BASH_SPECIAL_CHARS/
47 1 168 unless defined $arg
48 43 125 if &_should_quote()
63 36 14 if (ref $arg) { }
5 9 elsif ($arg eq '-c') { }
8 1 elsif ($arg eq '-e') { }
65 1 35 if $capture
71 2 3 unless length $dash_c_cmd
82 3 60 if (defined $dash_c_cmd) { }
84 1 2 if @_
88 4 56 unless @_
89 1 2 if @_ == 1 and $_[0] and $_[0] =~ /\s/
93 12 46 if ref $_[-1] eq 'CODE'
94 1 57 if $capture and $filter
100 2 55 $dash_c_cmd ? :
103 31 25 if ($capture) { }
11 14 elsif ($filter) { }
106 30 1 unless defined $IFS
109 24 6 if ($capture eq 'string') { }
2 4 elsif ($capture eq 'lines') { }
3 1 elsif ($capture eq 'words') { }
117 1 1 wantarray ? :
122 2 1 wantarray ? :
131 2 9 unless $cmd[-1] =~ s/\s*(?
132 3 6 if $1
137 0 9 unless defined $pid
139 6 3 if ($pid) { }
147 1 5 unless (close CHILD)
156 0 0 unless exec @cmd
188 3 4 $num < 0 ? :
195 1 6 unless $num
196 3 3 $num < 0 ? :