Branch Coverage

blib/lib/FTN/Database.pm
Criterion Covered Total %
branch 10 28 35.7


line true false branch
48 0 0 unless $db_handle->do("$sql_statement")
107 0 3 if (do { $option }->{'Type'} eq 'mysql') { }
113 0 3 if (exists do { $option }->{'Host'})
114 0 0 if (do { $option }->{'Host'} ne '')
119 0 3 if (exists do { $option }->{'Port'})
120 0 0 if (do { $option }->{'Port'} ne '')
128 0 3 unless my $db_handle = 'DBI'->connect($db_dsn, do { $option }->{'User'}, do { $option }->{'Password'})
147 0 3 unless $db_handle->disconnect
169 0 0 unless $db_handle->do("$sql_statement")
199 0 4 if ($db_handle->{'Driver'}{'Name'} eq 'Pg') { }
207 0 4 unless $db_handle->do("$sql_statement ")
229 0 4 unless $db_handle->do("$sql_statement")
254 0 4 unless $db_handle->do("$sql_statement")
276 0 4 unless $db_handle->do("$sql_statement")