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