Branch Coverage

blib/lib/Class/PObject/Driver/sqlite.pm
Criterion Covered Total %
branch 3 24 12.5


line true false branch
20 0 0 unless my $dbh = $self->dbh($object_name, $props)
21 0 0 unless my $table = $self->_tablename($object_name, $props, $dbh)
25 0 0 if ($columns->{'id'})
27 0 0 if ($self->count($object_name, $props, {'id', $columns->{'id'}}))
31 0 0 unless ($sql)
35 0 0 unless ($sth->execute(@$bind_params))
55 0 1 if (defined $self->stash($datasource))
62 1 0 unless (-e $basedir)
63 0 1 unless (File::Path::mkpath($basedir))
70 0 0 unless (defined $dbh)
92 0 0 if ($tables{$table_name})
98 0 0 unless ($dbh->do($sql))