| blib/lib/DiaColloDB/WWW/CGI.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 59 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 244 | 0 | 0 | 0 | defined $dbcgi->{'vars'} and not defined $vars |
| 263 | 0 | 0 | 0 | $dbcgi->{'charset'} and not utf8::is_utf8($tmp) |
| 0 | 0 | 0 | $dbcgi->{'charset'} and not utf8::is_utf8($tmp) and not exists $dbcgi->{'nodecode'}{$_} | |
| 416 | 0 | 0 | 0 | @content && defined $content[0] |
| 461 | 0 | 0 | 0 | $host and $host =~ /:([0-9]+)$/ |
| 636 | 0 | 0 | 0 | not $_[1] and utf8::is_utf8($_[0]) |
| line | l | !l | condition |
|---|---|---|---|
| 163 | 0 | 0 | $ENV{'REMOTE_ADDR'} || '0.0.0.0' |
| 165 | 0 | 0 | $ENV{'REQUEST_METHOD'} || 'GET' |
| 183 | 0 | 0 | $path[$#path] || 'index' |
| 247 | 0 | 0 | $dbcgi->{'cgipkg'} // 'CGI' |
| 321 | 0 | 0 | $dbcgi->{'ttk_dir'} || '.' |
| 377 | 0 | 0 | $, // '' |
| 471 | 0 | 0 | $dbcgi->httpHost // '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 87 | 0 | 0 | 0 | ref $that || $that |
| 0 | 0 | 0 | ref $that || $that | |
| 164 | 0 | 0 | 0 | $ENV{'REMOTE_USER'} || getpwuid $> |
| 166 | 0 | 0 | 0 | $ENV{'REQUEST_URI'} || $0 |
| 191 | 0 | 0 | 0 | $uri->host || $csock->sockhost |
| 245 | 0 | 0 | 0 | $vars ||= $dbcgi->cgi('param') ? {%{$dbcgi->cgi('Vars');}} : {} |
| 247 | 0 | 0 | 0 | ($dbcgi->{'cgipkg'} // 'CGI') ne 'CGI' or defined $vars->{'POSTDATA'} |
| 474 | 0 | 0 | 0 | $host && $host =~ /:[0-9]+$/ || $port == ($scheme eq 'https' ? 443 : 80) |
| 627 | 0 | 0 | 0 | $_[1] or utf8::is_utf8($_[0]) |