Branch Coverage

blib/lib/Net/SinFP3/DB/SinFP3.pm
Criterion Covered Total %
branch 0 34 0.0


line true false branch
50 0 0 unless (defined $file)
52 0 0 if (-f $_ . 'sinfp3.db')
59 0 0 if (not defined $file) { }
0 0 elsif (not -f $file) { }
112 0 0 unless my $self = (shift())->SUPER::init(@_)
130 0 0 unless my $dbh = 'DBI'->connect('dbi:SQLite:dbname=' . $self->file, '', '', {'RaiseError', 0, 'PrintError', 0, 'AutoCommit', 0, 'HandleError', sub { my($errstr, $dbh, $arg) = @_; $log->fatal("Database error: [$errstr]"); return 1; } })
141 0 0 unless $v > 0
146 0 0 unless $v > 0
253 0 0 if ($value) { }
280 0 0 if ($value) { }
337 0 0 if (exists $h->{'idSignature'}) { }
517 0 0 if ($self->_dbh)
538 0 0 if ($db->is_success) { }
539 0 0 unless open my $out, '>', $dbFile
567 0 0 if ($db->is_success) { }
570 0 0 unless open my $in, '<', $dbFile
577 0 0 if ($oldmd5 ne $md5) { }