| blib/lib/Class/DBI/Loader/SQLite.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 81 | 1 | 12 | if $col =~ s/^\s*FOREIGN\s+KEY\s*//i and $col =~ /^\([^,)]+,/ |
| 88 | 1 | 11 | if ($col =~ /^(\w+).*REFERENCES\s+(\w+)/i) |
| 90 | 0 | 1 | if $self->debug |
| 93 | 0 | 1 | if $@ and $self->debug |
| 101 | 0 | 1 | unless my $dbh = 'DBI'->connect(@{$$self{'_datasource'};}) |
| 106 | 1 | 4 | unless lc $$row{'type'} eq 'table' |