Branch Coverage

blib/lib/App/htidx.pm
Criterion Covered Total %
branch 0 28 0.0


line true false branch
34 0 0 unless "-h" eq $_
0 0 if &any(sub { ; } , @_)
38 0 0 unless -e $dir
39 0 0 unless -d $dir
70 0 0 if (-d $path or -l $path and -d readlink $path) { }
0 0 elsif (lc $entry ne 'index.html') { }
81 0 0 if (-e $index)
85 0 0 if (index($fh->getline, "\@~\@ I was made by App::htidx \@~\@") != -1)
94 0 0 if $mkhtml
104 0 0 unless open my $fh, ">", $index
130 0 0 unless $toplevel
181 0 0 if ($size < 1000) { }
0 0 elsif ($size < 1000000) { }
0 0 elsif ($size < 1000000000) { }