blib/lib/App/MonM/Notifier/Store.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 45 | 0.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
323 | 0 | 0 | 0 | $dbh and $dsn =~ /SQLite/i |
325 | 0 | 0 | 0 | $file and -e $file |
0 | 0 | 0 | $file and -e $file and not -z $file |
line | l | !l | condition |
---|---|---|---|
303 | 0 | 0 | $args{'file'} || '.monotifier.db' |
339 | 0 | 0 | $DBI::errstr || 'unknown error' |
348 | 0 | 0 | $dbh->errstr || 'unknown error' |
360 | 0 | 0 | $args{'expires'} || 2592000 |
425 | 0 | 0 | $data{'status'} || 'NEW' |
458 | 0 | 0 | shift() || 0 |
459 | 0 | 0 | shift() || 'SKIP' |
472 | 0 | 0 | shift() || 0 |
473 | 0 | 0 | shift() || 1 |
487 | 0 | 0 | shift() || 0 |
500 | 0 | 0 | shift() || 0 |
513 | 0 | 0 | shift() || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
300 | 0 | 0 | 0 | $args{$_} //= $dda->{$_} |
304 | 0 | 0 | 0 | $args{'dsn'} || sprintf('dbi:SQLite:dbname=%s', $file) |
407 | 0 | 0 | 0 | $data{'pubdate'} || time |
460 | 0 | 0 | 0 | shift() || sprintf('Modified at %s', scalar localtime time) |