| line | % | coverage | condition |
|---|
| 199 | 67 | | $$params{"expires_in"} and not $$params{"cache_duration"} |
| 205 | 100 | | $defaults{"cache_duration"} ||= "1 hour" |
| 227 | 0 | | scalar @_ == 1 and ref $_[0] eq "HASH" |
| 323 | 100 | | scalar @_ == 1 and not ref $_[0] |
| 349 | 25 | | &Scalar::Util::blessed($args{"logger"}) and $args{"logger"}->can("info") and $args{"logger"}->can("error") |
| 354 | 100 | | $args{"directory"} or $defaults{"directory"} |
| 356 | 67 | | $args{'directory'} || $defaults{'directory'} |
| 33 | | $args{'directory'} || $defaults{'directory'} |
| 420 | 67 | | $$params{"sep_char"} ||= $$self{"sep_char"} ? $$self{"sep_char"} : "!" |
| 421 | 67 | | $$params{'max_slurp_size'} || $$self{'max_slurp_size'} |
| 423 | 33 | | $$self{'table'} || ref $self |
| 433 | 33 | | $$self{'directory'} || $defaults{'directory'} |
| 434 | 67 | | $$self{'dbname'} || $defaults{'dbname'} || $table |
| 442 | 0 | | require DBI and "DBI"->import |
| 463 | 33 | | defined $slurp_file and -r $slurp_file |
| 482 | 67 | | $$self{'filename'} || $defaults{'filename'} |
| 486 | 67 | | defined $slurp_file and -r $slurp_file |
| 557 | 100 | | -s $slurp_file <= $max_slurp_size and not $$params{"column_names"} |
| 610 | 0 | | ref $xml eq "HASH" and not $$self{"no_entry"} |
| 654 | 67 | | $$self{"data"} and ref($$self{"data"} eq "HASH") |
| 694 | 50 | | scalar keys %{$params;} == 1 and defined $$params{"entry"} and not $$self{"no_entry"} |
| 728 | 100 | | $$self{"type"} eq "CSV" and not $$self{"no_entry"} |
| 860 | 25 | | scalar keys %{$params;} == 1 and defined $$params{"entry"} and not $$self{"no_entry"} |
| 876 | 100 | | $$self{"type"} eq "CSV" and not $$self{"no_entry"} |
| 1002 | 25 | | scalar keys %{$params;} == 1 and defined $$params{"entry"} and not $$self{"no_entry"} |
| 1016 | 67 | | $$self{"type"} eq "CSV" and not $$self{"no_entry"} |
| 1130 | 60 | | A | B | C | D | dec |
|---|
| 0 | X | X | X | 0 | | 1 | 0 | X | X | 0 | | 1 | 1 | 0 | X | 0 | | 1 | 1 | 1 | 0 | 0 | | 1 | 1 | 1 | 1 | 1 |
| $$self{"data"} and not $$self{"no_entry"} and scalar keys %{$params;} == 1 and defined $$params{"entry"} |
| 1138 | 0 | | not $$self{"no_entry"} and scalar keys %{$params;} == 1 and defined $$params{"entry"} |
| 1142 | 0 | | A | B | C | D | dec |
|---|
| 0 | X | X | X | 0 | | 1 | 0 | X | X | 0 | | 1 | 1 | 0 | X | 0 | | 1 | 1 | 1 | 0 | 0 | | 1 | 1 | 1 | 1 | 1 |
| $$self{"no_entry"} and scalar keys %{$params;} == 1 and defined $id and defined $$params{$id} |
| 1159 | 67 | | $$self{"type"} eq "CSV" and not $$self{"no_entry"} |
| 1348 | 33 | | exists $self->{'auto_load'} and &boolean($$self{"auto_load"})->isFalse |
| 1362 | 33 | | $$self{"no_entry"} and not $$self{"berkeley"} |
| 1378 | 100 | | delete $params{'distinct'} || delete $params{'unique'} |
| 1380 | 100 | | wantarray and not $distinct |
| 1381 | 100 | | scalar keys %params == 0 and my $data = $$self{"data"} |
| 1385 | 67 | | $$self{"type"} eq "CSV" and not $$self{"no_entry"} |
| 1396 | 100 | | scalar keys %params == 1 and defined(my $key = $params{"entry"}) |
| 1402 | 0 | | defined $$row{$key} and $$row{$key} eq $value and my $rc = $$row{$column} |
| 1450 | 50 | | defined $$row{$key} and $$row{$key} eq $value and my $rc = $$row{$column} |
| 1463 | 67 | | $$self{"type"} eq "CSV" and not $$self{"no_entry"} |
| 1496 | 67 | | scalar @args and $args[0] |
| 1521 | 33 | | $$self{$table}->prepare($query) || croak($query) |
| 1543 | 33 | | defined $^V and $^V ge "v5.14.0" |
| 1554 | 33 | | $$self{'table'} || ref $self |
| 1582 | 33 | | $$params{'table'} || $$self{'table'} || ref $self |
| 1586 | 67 | | $$self{$table} or $$self{"data"} |
| 1602 | 0 | | $self->_is_berkeley_db_0($fh) || $self->_is_berkeley_db_12($fh) |
| 1641 | 0 | | $known_magic{$magic_be} || $known_magic{$magic_le} |
| 1655 | 0 | | $header eq '6115' || $header eq '1561' |
| 1668 | 33 | | scalar @messages and my $logger = $$self{"logger"} |