| blib/lib/DBD/ExampleP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 25 | 32 | 78.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 97 | 1461 | 0 | 4295 | defined $fields and defined $dir |
| 123 | 1461 | 2071 | 2188 | defined $dir and not $dir =~ /\?/ |
| line | l | !l | condition |
|---|---|---|---|
| 140 | 8 | 8 | $type || 'TABLE' |
| 316 | 1902 | 0 | $sth->bind_param($_, $dir[$_ - 1]) or return |
| 319 | 3852 | 1517 | $sth->{'dbd_param'} || [] |
| 413 | 14 | 0 | $sth->{'dbd_param'} || [] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 145 | 4 | 12 | 0 | $catalog || 'File::Spec'->curdir |
| 174 | 6 | 10 | 0 | $dbh->{'dbd_sponge_dbh'} ||= 'DBI'->connect('DBI:Sponge:', '', '') |
| 325 | 3840 | 56 | 0 | $dbd_param->[0] || $sth->{'examplep_ex_dir'} |
| 426 | 4261 | 4259 | 19610 | $attrib eq 'NAME' or $attrib eq 'NULLABLE' |
| 8520 | 4259 | 15351 | $attrib eq 'NAME' or $attrib eq 'NULLABLE' or $attrib eq 'SCALE' | |
| 8518 | 0 | 15351 | $attrib eq 'NAME' or $attrib eq 'NULLABLE' or $attrib eq 'SCALE' or $attrib eq 'PRECISION' |