| blib/lib/SQL/Interp.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 19 | 23 | 82.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 137 | 16 | 0 | 2 | keys %$item == 1 and defined $item->{'value'} |
| 151 | 149 | 0 | 4 | $sql =~ /\b(?:ON\s+DUPLICATE\s+KEY\s+UPDATE|SET)\s*$/is and ref $item eq 'HASH' |
| 88 | 2 | 33 | $sql =~ /(?:\bFROM|JOIN)\s*$/is and not $sql =~ /DISTINCT\s+FROM\s*$/ | |
| 221 | 29 | 0 | 4 | defined $next_item and ref $next_item eq '' |
| 29 | 2 | 2 | defined $next_item and ref $next_item eq '' and $next_item =~ /\s*AS\b/is |
| line | l | !l | condition |
|---|---|---|---|
| 152 | 2 | 28 | $1 || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 80 | 83 | 0 | 81 | UNIVERSAL::isa($items[0], 'SQL::Interp') or UNIVERSAL::isa($items[0], 'DBI::db') |
| 269 | 176 | 2 | 27 | $sql =~ /(^|\s)$/ or $item =~ /^\s/ |