| line |
true |
false |
branch |
|
72
|
0 |
0 |
unless $dbh = 'DBI'->connect("dbi:SQLite:dbname=$DB") |
|
74
|
0 |
0 |
unless $insert = $dbh->prepare('INSERT INTO presence (start, end, nick) VALUES (?,?,?)') |
|
75
|
0 |
0 |
unless $update = $dbh->prepare('UPDATE presence SET end = ? WHERE start == ? AND nick == ?') |
|
83
|
0 |
0 |
unless exists $nicks{$nick} |
|
130
|
0 |
5 |
if ($message =~ /(?:${botnick}[:,])?\s*!?help\s*(.*)/sux) |
|
137
|
0 |
5 |
unless $message =~ /(?:${botnick}[:,])?\s*!?presence\s*(.*)/sux |
|
142
|
1 |
4 |
unless (defined $time) |
|
149
|
0 |
5 |
unless (eval {
do {
$time = parse_duration($time)
}
}) |
|
157
|
2 |
3 |
if ($truncate == -1) { } |