| line |
true |
false |
branch |
|
232
|
0 |
1 |
if (defined $self->variables_validation_spec) |
|
252
|
0 |
1 |
if ($error =~ /database .*? does not exist/i or $error =~ /unknown database/i) { } |
|
|
0 |
1 |
elsif ($error) { } |
|
254
|
0 |
0 |
if ($self->database_driver ne 'SQLite') |
|
257
|
0 |
0 |
if $self->database_driver =~ /Pg/ |
|
258
|
0 |
0 |
if $self->database_driver eq 'mysql' |
|
267
|
0 |
0 |
if $self->database_driver =~ /Pg/ |
|
299
|
0 |
0 |
if ($cgi->param('upload')) { } |
|
|
0 |
0 |
elsif ($cgi->param('id')) { } |
|
328
|
0 |
0 |
unless sysopen my $fh, $bucket_file, 66 |
|
330
|
0 |
0 |
unless flock $fh, 2 |
|
338
|
0 |
0 |
unless ($bucket->conform(1)) |
|
344
|
0 |
0 |
unless seek $fh, 0, 0 |
|
345
|
0 |
0 |
unless truncate $fh, 0 |
|
347
|
0 |
0 |
unless store_fd([$bucket->state], $fh) |
|
350
|
0 |
0 |
if $exit |
|
357
|
0 |
0 |
if (not $cgi->param('version') or $cgi->param('version') != 1) |
|
363
|
0 |
0 |
if (not $cgi->param('archive')) |
|
375
|
0 |
0 |
if (defined $$self{'variables_validation_spec'}) |
|
379
|
0 |
0 |
if (defined $@ and $@) |
|
441
|
0 |
0 |
$aggregator->total ? : |
|
445
|
0 |
0 |
unless ($id) |
|
502
|
0 |
0 |
if (defined $self->lister) { } |