Branch Coverage

blib/lib/Filesys/DiskUsage.pm
Criterion Covered Total %
branch 32 40 80.0


line true false branch
189 38 5 if (ref $_[0] eq 'HASH')
193 20 23 if (not defined $calling_sub or $calling_sub ne 'Filesys::DiskUsage::du')
200 1 123 if exists $all{$_}
202 39 0 if (defined $config{'exclude'} and -f $_ || -d $_)
204 13 26 if $filename =~ /$config{'exclude'}/
206 2 108 if (-l $_) { }
77 31 elsif (-f $_) { }
31 0 elsif (-d $_) { }
207 1 1 if ($config{'dereference'}) { }
215 0 1 if defined $config{'symlink-size'}
224 22 9 if ($config{'recursive'} and $config{'max-depth'})
226 22 0 if (opendir DIR, $_) { }
0 0 elsif ($config{'show-warnings'}) { }
249 1 42 if ($config{'make-hash'}) { }
252 1 0 wantarray ? :
255 1 41 if (wantarray) { }
270 0 50 unless defined(my $size = shift())
272 46 4 unless $$config{'human'}
273 1 3 $$config{'Human-readable'} ? :
281 2 2 if ($$config{'truncate-readable'} > 0)