| blib/lib/DBO.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 16 | 18.7 |
| line | true | false | branch |
|---|---|---|---|
| 34 | 0 | 4 | unless isa($$self{'schema'}, 'DBO::Database') |
| 40 | 4 | 0 | unless isa($$self{'handle'}, 'DBO::Handle') |
| 60 | 0 | 0 | unless ref $vis |
| 67 | 0 | 0 | unless my $table = $$self{'schema'}->lookup_table($id) |
| 70 | 0 | 0 | unless ref $vis |
| 109 | 0 | 0 | unless my $dbh = 'DBI'->connect(@_) |
| 116 | 0 | 0 | unless $$self->do($sql) |
| 149 | 4 | 0 | if $DBO::DEBUG |