Branch Coverage

blib/lib/Tk/TextHighlight/Bash.pm
Criterion Covered Total %
branch 0 48 0.0


line true false branch
15 0 0 unless (defined $rules)
66 0 0 if ($text =~ s/^(`)//o)
86 0 0 if ($text =~ s/^(\\.)//o)
90 0 0 if ($text =~ s/^(\$[^$separators]*)//)
94 0 0 if ($text =~ s/^(`)//o)
99 0 0 if ($text =~ s/^(")//o)
104 0 0 if ($text =~ s/^([^"|\$|`]+)//o)
128 0 0 if ($text =~ s/^([^']+)//o)
132 0 0 if ($text =~ s/^(')//o)
142 0 0 if ($text =~ s[^(^#!/.*)][]o)
146 0 0 if ($text =~ s/^(#.*)//o)
150 0 0 if ($text =~ s/^(\s+)//o)
154 0 0 if ($text =~ s/^(`)//)
159 0 0 if ($text =~ s/^(")//o)
164 0 0 if ($text =~ s/^('[^']*)//o)
166 0 0 if ($text) { }
167 0 0 if ($text =~ s/(^')//o)
175 0 0 if ($text =~ s/^(\$[^$separators]*)//)
179 0 0 if ($text =~ s/^([\|\||\||&&|&|;;|;|(|)])//o)
183 0 0 if ($text =~ s/^([<|>])//o)
187 0 0 if ($text =~ s/^(\\.)//o)
191 0 0 if ($text =~ s/^([^$separators]+)//)
192 0 0 if ($self->tokenTest($1, 'Reserved')) { }
0 0 elsif ($self->tokenTest($1, 'Keyword')) { }