| blib/lib/Apache2/SSI/Common.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 9 | 25 | 36.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 38 | 474 | 6 | 0 | substr($path, 0, 2) eq '/.' and 2 == $len |
| 112 | 58 | 0 | 0 | $binmode eq ':unix' and $size = -s $fh |
| 127 | 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 |
|---|---|---|---|
| 105 | 58 | 0 | $args->{'binmode'} // '' |
| 108 | 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 |
|---|---|---|---|---|
| 38 | 0 | 0 | 480 | $path eq '..' or $path eq '.' |
| 103 | 0 | 0 | 0 | $args->{'filename'} || $args->{'file'} || $self->filename |
| 127 | 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') |
| 141 | 0 | 58 | 0 | $args->{'filename'} || $args->{'file'} || $self->filename |