| line | % | coverage | condition |
| 82 | 100 | | $MESSAGES{$key} // (return "Internal error: unknown message key '${key}'") |
| 117 | 80 | | A | B | C | D | dec |
|---|
| 0 | 0 | 0 | 0 | 0 | | 0 | 0 | 0 | 1 | 1 | | 0 | 0 | 1 | X | 1 | | 0 | 1 | X | X | 1 | | 1 | X | X | X | 1 |
| $host eq "localhost" or $host =~ /\A127\./u or $host eq "0.0.0.0" or $host eq "::1" |
| 146 | 50 | | $conf->{'platform'} // "web" |
| 147 | 50 | | $conf->{'language'} // "en" |
| 162 | 100 | | $self->req->headers->accept_language // "" |
| 169 | 67 | | $lang //= $default |
| 175 | 50 | | $self->app->config->{'platform'} // "web" |
| 196 | 50 | | $self->app->config->{'data_dir'} // "data" |
| 219 | 50 | | $self->app->config->{'data_dir'} // "data" |
| 222 | 33 | | $src and not $@ |
| 226 | 50 | | defined $file and -f $file and $file->basename =~ /$EXT_RE/u |
| 230 | 33 | | $src and not $@ |
| 237 | 33 | | $src and not $@ |
| 274 | 100 | | $c && $all{$c} |
| 316 | 100 | | $col // "" |
| 100 | | length($col // "") and defined $op and length $op |
| 317 | 100 | | $val //= "" |
| 320 | 100 | | $_->{$col} // "" |
| 350 | 50 | | $self->every_param("f") // [] |
| 354 | 100 | | $col // "" |
| 75 | | length($col // "") and defined $op and length $op |
| 355 | 100 | | $val // "" |
| 383 | 50 | | $row->{$right_key} // "" |
| 384 | 67 | | $right_idx{$k} //= $row |
| 405 | 50 | | $left_row->{$left_key} // "" |
| 406 | 100 | | $right_idx{$k} // {} |
| 448 | 50 | | $row->{$_} // "" |
| 465 | 100 | | $_ // "" |
| 479 | 100 | | $combine_specs // [] |
| 499 | 100 | | $entry eq "." or $entry eq ".." or $entry =~ /\A\./u |
| 501 | 100 | | $want_files and $entry =~ /$EXT_RE/u |
| 540 | 100 | | $@ or not $dbh |
| 582 | 100 | | $self->param("l") // "" |
| 588 | 50 | | $left_recs //= [] |
| 595 | 25 | | defined $right_spec and defined $left_key and defined $right_key |
| 600 | 50 | | eval {
do {
$right_src->fetch_all
}
} // [] |
| 614 | 50 | | $self->every_param("c") // [] |
| 620 | 50 | | eval {
do {
$csrc->fetch_all
}
} // [] |
| 810 | 67 | | defined $table and $table =~ /$TABLE_NAME_RE/u |
| 893 | 50 | | ($self->param("path") // $ENV{'HOME'}) // "/" |
| 67 | | $self->param("path") // $ENV{'HOME'} |
| 895 | 100 | | defined $dir and -d $dir |
| 1019 | 100 | | defined $file and -f $file and $file->basename =~ /$EXT_RE/u |
| 1109 | 100 | | $self->param("url") // "" |
| 1110 | 100 | | $self->param("table_index") // 0 |
| 1131 | 67 | | $@ or not $source |
| 50 | | $@ // "unknown error" |
| 1134 | 50 | | $@ // "empty result" |
| 1207 | 100 | | defined $table_name and $table_name =~ /$TABLE_NAME_RE/u |
| 1208 | 50 | | $self->app->config->{'data_dir'} // "data" |
| 1215 | 50 | | defined $file and -f $file and $file->basename =~ /$EXT_RE/u |
| 1225 | 50 | | eval {
do {
$source->fetch_all
}
} // [] |
| 1285 | 100 | | $self->param("l") // "" |
| 1300 | 50 | | $left_recs //= [] |
| 1309 | 25 | | defined $right_spec and defined $left_key and defined $right_key |
| 1318 | 50 | | eval {
do {
$right_src->fetch_all
}
} // [] |
| 1414 | 50 | | $self->param("l") // "" |
| 1429 | 50 | | $left_recs //= [] |
| 1440 | 50 | | eval {
do {
$csrc->fetch_all
}
} // [] |
| 1540 | 100 | | $self->param("format") // "csv" |
| 1619 | 50 | | $self->param("dir") // "" |
| 1620 | 50 | | $self->param("filename") // "" |
| 1623 | 100 | | defined $dest_dir and -d $dest_dir |
| 1633 | 100 | | $filename and $filename =~ /\.sql\z/iu |
| 100 | | $filename and $filename =~ /\.csv\z/iu |
| 1704 | 50 | | ($self->param("path") // $ENV{'HOME'}) // "/" |
| 67 | | $self->param("path") // $ENV{'HOME'} |
| 1706 | 100 | | defined $dir and -d $dir |
| 1772 | 100 | | defined $path and length $path |
| 1782 | 100 | | defined $file and -f $file and $file->basename =~ /$EXT_RE/u |
| 1839 | 67 | | $upload and $upload->filename |
| 1851 | 67 | | $self->req->is_limit_exceeded or $upload->size > $MAX_UPLOAD_BYTES |
| 1861 | 67 | | $filename and $filename =~ /$EXT_RE/u |