| blib/lib/SQLite/Archive.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 22 | 40.9 |
| line | true | false | branch |
|---|---|---|---|
| 91 | 0 | 1 | unless (defined $self->dir) |
| 93 | 0 | 0 | unless (-f $self->file) |
| 100 | 0 | 0 | unless $archive->extract('to', $tempdir) |
| 103 | 0 | 1 | unless (-d $self->dir) |
| 108 | 0 | 1 | unless opendir ARCHIVE, $self->dir |
| 110 | 0 | 1 | unless closedir ARCHIVE |
| 160 | 0 | 1 | if (@_) { } |
| 171 | 0 | 1 | unless ($db) |
| 217 | 0 | 1 | unless my $parser = 'Parse::CSV'->new('file', $file, 'fields', 'auto') |
| 222 | 0 | 1 | unless $table =~ s/\.csv$// |
| 232 | 2 | 0 | if $dbh->do($sql, {}, values %$row) |