| blib/lib/Apache2/SSI/Common.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 27 | 40.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 106 | 474 | 6 | 0 | substr($path, 0, 2) eq "$sep." and 2 == $len |
| 190 | 58 | 0 | 0 | $binmode eq ':unix' and $size = -s $fh |
| 205 | 0 | 0 | 58 | defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL') |
| line | l | !l | condition |
|---|---|---|---|
| 93 | 156 | 325 | $opts->{'separator'} //= '' |
| 183 | 58 | 0 | $args->{'binmode'} // '' |
| 186 | 58 | 0 | 'IO::File'->new("<$file") || (return $self->error(qq[Unable to open file "$file" in read mode: $!])) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 106 | 0 | 0 | 480 | $path eq '..' or $path eq '.' |
| 181 | 0 | 0 | 0 | $args->{'filename'} || $args->{'file'} || $self->filename |
| 205 | 58 | 0 | 0 | !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL') |
| 219 | 0 | 58 | 0 | $args->{'filename'} || $args->{'file'} || $self->filename |