blib/lib/YATT/Lite/WebMVC0/SiteApp/CGI.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 8 | 32 | 25.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
34 | 0 | 16 | 0 | defined $fh and fileno $fh >= 0 |
87 | 16 | 0 | 0 | ref $args and UNIVERSAL::can($args, 'param') |
135 | 0 | 0 | 0 | defined $_[0] and not ref $_[0] |
154 | 0 | 0 | 0 | defined $con and UNIVERSAL::isa($error, $self->Error) |
155 | 14 | 0 | 0 | not tell $fh and my $len = length $con->buffer |
line | l | !l | condition |
---|---|---|---|
23 | 0 | 0 | local $env->{'REQUEST_METHOD'} //= 'GET' |
114 | 0 | 0 | Cwd::abs_path($path) // die("No such file: $path\n") |
127 | 15 | 1 | $self->{'cf_noheader'} //= 0 |
222 | 0 | 0 | $error // '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
128 | 8 | 0 | 0 | $self->{'cf_doc_root'} //= $env->{'DOCUMENT_ROOT'} |
135 | 0 | 0 | 0 | @_ > 1 or defined $_[0] and not ref $_[0] |
154 | 14 | 0 | 2 | not $error or is_done($error) |