| line |
true |
false |
branch |
|
58
|
0 |
2 |
unless my $dbh = 'DBI'->connect("dbi:SQLite:dbname=$filename", '', '')
|
|
65
|
0 |
2 |
unless $self->ensure_db_schema_correct
|
|
88
|
0 |
2 |
unless my $sth = $dbh->prepare($sql)
|
|
92
|
1 |
1 |
if $ok
|
|
94
|
0 |
1 |
unless $dbh->do("CREATE TABLE blogged\n ( timestamp text, name text, channel text, url text, comment text )")
|
|
116
|
0 |
1 |
unless my $sth = $dbh->prepare("\n INSERT INTO blogged (timestamp, name, channel, url, comment)\n VALUES (?, ?, ?, ?, ?)\n ")
|
|
121
|
0 |
1 |
unless $sth->execute(@args{'timestamp', 'name', 'channel', 'url', 'comment'})
|