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/ |