Branch Coverage

blib/lib/Apache2/SSI/Finfo.pm
Criterion Covered Total %
branch 49 138 35.5


line true false branch
33 0 17 if (exists $ENV{'MOD_PERL'})
89 0 160 if ($r) { }
95 0 0 if ($r->filename eq $file) { }
106 0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 length $@ ? :
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
109 0 0 if ($e =~ /No[[:blank:]\h]+such[[:blank:]\h]+file[[:blank:]\h]+or[[:blank:]\h]+directory/i) { }
117 0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (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'))
135 0 1 if ($f) { }
142 0 1 unless scalar @$data
154 0 0 if ($f) { }
161 0 0 unless scalar @$data
170 0 0 if ($f) { }
177 0 0 unless scalar @$data
197 0 1 if ($f) { }
204 0 1 unless scalar @$data
216 0 1 if ($f) { }
223 0 1 unless scalar @$data
228 2 8 (shift())->filetype == 0 ? :
237 0 23 if ($f) { }
246 4 19 if (not -e _) { }
17 2 elsif (-f _) { }
2 0 elsif (-d _) { }
0 0 elsif (-l _) { }
0 0 elsif (-p _) { }
0 0 elsif (-S _) { }
0 0 elsif (-b _) { }
0 0 elsif (-c _) { }
289 0 4 if ($r) { }
305 0 2 if ($f) { }
312 0 2 unless scalar @$data
323 0 1 if ($f) { }
330 0 1 unless scalar @$data
361 0 3 if ($f) { }
370 0 3 unless scalar @$data
380 0 3 if ($f) { }
387 0 3 unless scalar @$data
397 0 3 if ($f) { }
411 0 1 if ($f) { }
418 0 1 unless scalar @$data
427 0 1 if ($f) { }
435 0 1 unless scalar @stat
444 0 0 if ($f) { }
451 0 0 unless scalar @$data
460 0 6 if ($f) { }
467 0 6 unless scalar @$data
477 0 1 scalar @_ ? :
478 0 1 if $r and not $p->{'apache_request'}
488 0 3 if ($f) { }
495 0 3 unless scalar @$data
504 0 5 unless length $t
505 0 5 unless $t =~ /^\d+$/
516 2 3 if ($Nice::Try::WANTARRAY) { }
3 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 5 length $@ ? :
0 0 if ($Nice::Try::HAS_CATCH)
0 5 if ($Nice::Try::DIED)
519 0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
2 3 $Nice::Try::WANTARRAY ? :
5 0 if (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'))
546 5 0 if (@_)
560 0 5 unless ref $self->{'dt'}
562 0 5 if ($dt->can($method)) { }