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]) |