Branch Coverage

blib/lib/Rtmgr/Gen/Db.pm
Criterion Covered Total %
branch 0 106 0.0


line true false branch
71 0 0 if (-e "$s_file" . '.db') { }
81 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
94 0 0 if ($rv < 0) { }
106 0 0 unless (defined $s_user)
107 0 0 unless (defined $s_pw)
108 0 0 unless (defined $s_url)
109 0 0 unless (defined $s_port)
110 0 0 unless (defined $s_endp)
111 0 0 unless (defined $s_file)
121 0 0 if ($hash_search == '0') { }
129 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
133 0 0 unless my $rv = $dbh->do($stmt)
151 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
155 0 0 unless my $rv = $sth->execute
162 0 0 if ($rv < 0)
191 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
200 0 0 if ($hash_search == '0') { }
204 0 0 unless my $rv = $dbh->do($stmt)
209 0 0 unless my $rv = $dbh->do($stmt)
227 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
232 0 0 unless my $rv = $sth->execute
236 0 0 if ($rv < 0) { }
240 0 0 if (exists $row[0]) { }
254 0 0 unless (defined $s_user)
255 0 0 unless (defined $s_pw)
256 0 0 unless (defined $s_url)
257 0 0 unless (defined $s_port)
258 0 0 unless (defined $s_endp)
259 0 0 unless (defined $s_file)
269 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
276 0 0 unless my $rv = $sth->execute
278 0 0 if ($rv < 0)
284 0 0 if ($row[4]) { }
291 0 0 unless my $rv = $dbh->do($stmt)
293 0 0 if ($rv < 0) { }
309 0 0 unless (defined $s_user)
310 0 0 unless (defined $s_pw)
311 0 0 unless (defined $s_url)
312 0 0 unless (defined $s_port)
313 0 0 unless (defined $s_endp)
314 0 0 unless (defined $s_file)
325 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
332 0 0 unless my $rv = $sth->execute
334 0 0 if ($rv < 0)
339 0 0 if ($row[3]) { }
347 0 0 unless my $rv = $dbh->do($stmt)
349 0 0 if ($rv < 0) { }
372 0 0 unless my $dbh = 'DBI'->connect($dsn, $userid, $password, {'RaiseError', 1})
379 0 0 unless my $rv = $sth->execute
381 0 0 if ($rv < 0)
389 0 0 if ($row[2]) { }
399 0 0 unless my $rv = $dbh->do($stmt)
400 0 0 if ($rv < 0) { }