blib/lib/DBD/ExampleP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 25 | 32 | 78.1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
93 | 1433 | 0 | 2753 | defined $fields and defined $dir |
119 | 1433 | 537 | 2180 | defined $dir and not $dir =~ /\?/ |
line | l | !l | condition |
---|---|---|---|
136 | 8 | 8 | $type || 'TABLE' |
312 | 400 | 0 | $sth->bind_param($_, $dir[$_ - 1]) or return |
315 | 848 | 1489 | $$sth{'dbd_param'} || [] |
409 | 14 | 0 | $$sth{'dbd_param'} || [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
141 | 4 | 12 | 0 | $catalog || 'File::Spec'->curdir |
170 | 6 | 10 | 0 | $$dbh{'dbd_sponge_dbh'} ||= 'DBI'->connect('DBI:Sponge:', '', '') |
321 | 836 | 56 | 0 | $$dbd_param[0] || $$sth{'examplep_ex_dir'} |
422 | 2717 | 2717 | 11914 | $attrib eq 'NAME' or $attrib eq 'NULLABLE' |
5434 | 2717 | 9197 | $attrib eq 'NAME' or $attrib eq 'NULLABLE' or $attrib eq 'SCALE' | |
5434 | 0 | 9197 | $attrib eq 'NAME' or $attrib eq 'NULLABLE' or $attrib eq 'SCALE' or $attrib eq 'PRECISION' |