Branch Coverage

blib/lib/App/FileCleanerByDiskUage.pm
Criterion Covered Total %
branch 0 38 0.0


line true false branch
145 0 0 if (not defined $opts{'path'}) { }
0 0 elsif (ref $opts{'path'} ne 'ARRAY' and not -d $opts{'path'}) { }
0 0 elsif (ref $opts{'path'} eq 'ARRAY') { }
150 0 0 unless (defined $opts{'path'}[0])
157 0 0 if (not -d $opts{'path'}[$int]) { }
172 0 0 if (not defined $opts{'du'}) { }
0 0 elsif (not $opts{'du'} =~ /^\d+$/) { }
179 0 0 if (defined $opts{'min_files'} and not $opts{'min_files'} =~ /^\d+$/)
183 0 0 if (not $opts{'dry_run'}) { }
209 0 0 unless (defined $paths[0])
213 0 0 if ($df->{'per'} < $opts{'du'})
218 0 0 if (defined $opts{'ignore'}) { }
228 0 0 if ($opts{'min_files'} and not defined $files[$opts{'min_files'}])
253 0 0 if (defined $opts{'min_files'} and $opts{'min_files'} > 0)
267 0 0 if ($opts{'dry_run'} and not -w $files_info[$int]{'name'}) { }
270 0 0 unless unlink $files_info[$int]{'name'}
275 0 0 if ($@) { }
287 0 0 if (defined $results->{'unlinked'}[0])
290 0 0 if (defined $results->{'unlink_failed'}[0])