blib/lib/YATT/Lite/WebMVC0/SiteApp/CGI.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 8 | 45 | 17.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
68 | 0 | 16 | 0 | defined $fh and fileno $fh >= 0 |
121 | 16 | 0 | 0 | ref $args and UNIVERSAL::can($args, 'param') |
171 | 0 | 0 | 0 | @_ == 1 and defined $_[0] |
0 | 0 | 0 | @_ == 1 and defined $_[0] and not ref $_[0] | |
173 | 0 | 0 | 0 | defined $_[0] and not ref $_[0] |
191 | 0 | 0 | 0 | defined $con and UNIVERSAL::isa($error, $self->Error) |
192 | 14 | 0 | 0 | not tell $fh and my $len = length $con->buffer |
line | l | !l | condition |
---|---|---|---|
22 | 0 | 0 | local $env->{'REQUEST_METHOD'} //= 'GET' |
57 | 0 | 0 | local $env->{'REQUEST_METHOD'} //= 'GET' |
148 | 0 | 0 | Cwd::abs_path($path) // die("No such file: $path\n") |
161 | 15 | 1 | $self->{'cf_noheader'} //= 0 |
259 | 0 | 0 | $error // '' |
269 | 0 | 0 | $init_env->{'HTTPS'} || 'off' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
162 | 8 | 0 | 0 | $self->{'cf_doc_root'} //= $env->{'DOCUMENT_ROOT'} |
191 | 14 | 0 | 2 | not $error or is_done($error) |
270 | 0 | 0 | 0 | $stdin || *STDIN |
271 | 0 | 0 | 0 | $stderr || *STDERR |