| blib/lib/SQL/Beautify.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 21 | 32 | 65.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 121 | 0 | 12 | 0 | $last and uc $last eq 'WHERE' |
| 146 | 11 | 32 | 6 | $last and $last eq '(' |
| 149 | 0 | 4 | 45 | $self->_next_token and $self->_next_token ne '(' |
| 179 | 0 | 0 | 0 | $last and not $last =~ /^(?:LEFT|RIGHT|INNER|OUTER|CROSS)$/ |
| 224 | 122 | 159 | 6 | defined $last_token && $last_token eq '.' |
| 232 | 216 | 58 | 13 | $self->_is_keyword($token) and $$self{'uc_keywords'} |
| line | l | !l | condition |
|---|---|---|---|
| 126 | 12 | 0 | pop @{$$self{'_level_stack'};} || 0 |
| 319 | 7 | 0 | $$self{'rules'} ||= {} |
| 320 | 1 | 6 | $$rules{$format} ||= [] |
| 349 | 0 | 0 | pop @{$$self{'_level_stack'};} || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 227 | 36 | 0 | 251 | $self->_is_punctuation($token) or $last_is_dot |
| 363 | 5 | 35 | 168 | $token =~ /^\d+$/ || $token =~ /^(['"`]).*\1$/ |