Branch Coverage

blib/lib/SQL/Beautify.pm
Criterion Covered Total %
branch 65 78 83.3


line true false branch
59 8 0 unless defined $$self{'query'}
60 0 8 unless defined $$self{'spaces'}
61 7 1 unless defined $$self{'space'}
62 7 1 unless defined $$self{'break'}
63 6 2 unless defined $$self{'wrap'}
64 7 1 unless defined $$self{'keywords'}
65 8 0 unless defined $$self{'rules'}
66 7 1 unless defined $$self{'uc_keywords'}
91 12 24 if defined $query
113 14 273 if ($rule) { }
12 261 elsif ($token eq '(') { }
12 249 elsif ($token eq ')') { }
18 231 elsif ($token eq ',') { }
3 228 elsif ($token eq ';') { }
49 179 elsif ($token =~ /^(?:SELECT|FROM|WHERE|HAVING)$/i) { }
2 177 elsif ($token =~ /^(?:GROUP|ORDER|LIMIT)$/i) { }
1 176 elsif ($token =~ /^(?:BY)$/i) { }
0 176 elsif ($token =~ /^(?:UNION|INTERSECT|EXCEPT)$/i) { }
0 176 elsif ($token =~ /^(?:LEFT|RIGHT|INNER|OUTER|CROSS)$/i) { }
0 176 elsif ($token =~ /^(?:JOIN)$/i) { }
10 166 elsif ($token =~ /^(?:AND|OR)$/i) { }
121 12 0 unless $last and uc $last eq 'WHERE'
146 43 6 unless $last and $last eq '('
149 45 4 if $self->_next_token and $self->_next_token ne '('
179 0 0 if ($last and not $last =~ /^(?:LEFT|RIGHT|INNER|OUTER|CROSS)$/)
209 287 0 if ($$self{'wrap'})
212 79 208 if ($self->_is_keyword($token)) { }
40 168 elsif ($self->_is_constant($token)) { }
219 10 277 if ($wrap)
227 245 6 unless ($self->_is_punctuation($token) or $last_is_dot)
232 13 274 if $self->_is_keyword($token) and $$self{'uc_keywords'}
254 37 10 if $$self{'_level'} > 0
263 170 75 if ($$self{'_new_line'}) { }
276 170 32 unless $$self{'_new_line'}
285 98 0 @{$$self{'_tokens'};} ? :
310 0 1 ref $keyword ? :
322 4 3 ref $token ? :
333 14 518 if grep {uc $token eq uc $_;} @$list
354 35 0 if $$format{$_}