| blib/lib/Data/Phrasebook/SQL/Query.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 35 | 50 | 70.0 |
| line | true | false | branch |
|---|---|---|---|
| 66 | 0 | 6 | if $self->debug |
| 74 | 6 | 0 | if $self->sth |
| 80 | 1 | 9 | @_ ? : |
| 84 | 1 | 8 | @_ ? : |
| 88 | 7 | 103 | @_ ? : |
| 93 | 4 | 14 | if @_ |
| 99 | 0 | 9 | if @_ |
| 100 | 9 | 0 | if $$self{'order'} |
| 120 | 0 | 10 | if $self->debug |
| 122 | 5 | 5 | @_ ? : |
| 123 | 0 | 10 | if @args and not defined $args[0] |
| 124 | 2 | 8 | unless $sth |
| 126 | 5 | 5 | unless (@args) |
| 131 | 0 | 0 | unless $_ |
| 0 | 5 | if $self->debug | |
| 145 | 4 | 5 | @_ == 1 ? : |
| 152 | 9 | 0 | if (exists $args{$key}) |
| 155 | 1 | 8 | ref $val ? : |
| 172 | 0 | 8 | if $self->debug |
| 174 | 0 | 8 | if $self->debug |
| 175 | 0 | 8 | unless defined $sql |
| 197 | 0 | 5 | if $self->debug |
| 220 | 1 | 67 | if $execute and not $$sth{'Active'} |
| 230 | 6 | 0 | if ($sth->can($method)) |
| 233 | 4 | 2 | $method =~ /^fetch/ ? : |