Branch Coverage

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


line true false branch
153 0 0 if ($opts{'use_pid'})
154 0 0 if (not defined $opts{'pid_dir'}) { }
157 0 0 unless (-d $opts{'pid_dir'})
162 0 0 if (not defined $opts{'pid_name'}) { }
165 0 0 if ($opts{'pid_name'} =~ m[/] or $opts{'pid_name'} =~ /\\/)
181 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') { }
182 0 0 if ($opts{'use_pid'})
189 0 0 unless (defined $opts{'path'}[0])
190 0 0 if ($opts{'use_pid'})
199 0 0 if (not -d $opts{'path'}[$int]) { }
214 0 0 unless (defined $paths[0])
218 0 0 if (not defined $opts{'du'}) { }
0 0 elsif (not $opts{'du'} =~ /^\d+$/) { }
219 0 0 if ($opts{'use_pid'})
224 0 0 if ($opts{'use_pid'})
231 0 0 if (defined $opts{'min_files'} and not $opts{'min_files'} =~ /^\d+$/)
232 0 0 if ($opts{'use_pid'})
238 0 0 if (not $opts{'dry_run'}) { }
264 0 0 unless (defined $paths[0])
265 0 0 if ($opts{'use_pid'})
271 0 0 if ($df->{'per'} < $opts{'du'})
272 0 0 if ($opts{'use_pid'})
279 0 0 if (defined $opts{'ignore'}) { }
289 0 0 if ($opts{'min_files'} and not defined $files[$opts{'min_files'}])
291 0 0 if ($opts{'use_pid'})
318 0 0 if (defined $opts{'min_files'} and $opts{'min_files'} > 0)
332 0 0 if ($opts{'dry_run'} and not -w $files_info[$int]{'name'}) { }
335 0 0 unless unlink $files_info[$int]{'name'}
340 0 0 if ($@) { }
352 0 0 if (defined $results->{'unlinked'}[0])
355 0 0 if (defined $results->{'unlink_failed'}[0])
359 0 0 if ($opts{'use_pid'})