| line |
true |
false |
branch |
|
147
|
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') { } |
|
152
|
0 |
0 |
unless (defined $opts{'path'}[0]) |
|
159
|
0 |
0 |
if (not -d $opts{'path'}[$int]) { } |
|
174
|
0 |
0 |
if (not defined $opts{'du'}) { } |
|
|
0 |
0 |
elsif (not $opts{'du'} =~ /^\d+$/) { } |
|
181
|
0 |
0 |
if (defined $opts{'min_files'} and not $opts{'min_files'} =~ /^\d+$/) |
|
185
|
0 |
0 |
if (not $opts{'dry_run'}) { } |
|
211
|
0 |
0 |
unless (defined $paths[0]) |
|
215
|
0 |
0 |
if ($df->{'per'} < $opts{'du'}) |
|
220
|
0 |
0 |
if (defined $opts{'ignore'}) { } |
|
230
|
0 |
0 |
if ($opts{'min_files'} and not defined $files[$opts{'min_files'}]) |
|
255
|
0 |
0 |
if (defined $opts{'min_files'} and $opts{'min_files'} > 0) |
|
269
|
0 |
0 |
if ($opts{'dry_run'} and not -w $files_info[$int]{'name'}) { } |
|
272
|
0 |
0 |
unless unlink $files_info[$int]{'name'} |
|
277
|
0 |
0 |
if ($@) { } |
|
289
|
0 |
0 |
if (defined $results->{'unlinked'}[0]) |
|
292
|
0 |
0 |
if (defined $results->{'unlink_failed'}[0]) |