blib/lib/NTS/SqlLink.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
23 | 0 | 0 | unless defined $$vars{'acommit'} |
27 | 0 | 0 | if ($$vars{'type'} eq 'mysql') |
30 | 0 | 0 | unless $conn = 'DBI'->connect("DBI:$$vars{'type'}:$$vars{'db'}:$$vars{'host'}", $$vars{'username'}, $$vars{'passwd'}, {'AutoCommit', $$vars{'acommit'}}) |
50 | 0 | 0 | unless $t |
57 | 0 | 0 | if ($@) |
62 | 0 | 0 | if ($t eq 'array') { } |
0 | 0 | elsif ($t eq 'scalar') { } | |
94 | 0 | 0 | unless eval { do { $$self{'arows'} = $$self{'conn'}->do($q) } } |
131 | 0 | 0 | if $r eq 'NULL' |