line |
true |
false |
branch |
261
|
2 |
17 |
if @_ and defined $_[0] and $_[0] eq 'File::Next' |
269
|
205 |
44 |
if ($is_file or $is_fifo) |
270
|
20 |
185 |
if ($filter) |
274
|
9 |
11 |
unless &$filter() |
276
|
1 |
195 |
wantarray ? : |
278
|
44 |
0 |
if ($is_dir) |
289
|
2 |
3 |
if @_ and defined $_[0] and $_[0] eq 'File::Next' |
296
|
5 |
39 |
if ($is_dir) |
308
|
2 |
3 |
if @_ and defined $_[0] and $_[0] eq 'File::Next' |
316
|
10 |
78 |
if ($is_dir) |
319
|
44 |
44 |
if ($filter) |
323
|
35 |
9 |
unless &$filter() |
325
|
0 |
53 |
wantarray ? : |
333
|
0 |
7 |
if @_ and defined $_[0] and $_[0] eq 'File::Next' |
341
|
1 |
7 |
unless (defined $filename) |
347
|
0 |
7 |
if ($filename eq '-') { } |
351
|
2 |
5 |
unless (open $fh, '<', $filename) |
359
|
17 |
68 |
$parms->{'nul_separated'} ? : |
362
|
1 |
83 |
unless $fullpath =~ /./ |
363
|
3 |
80 |
unless (-f $fullpath or -p _) |
369
|
0 |
80 |
if ($filter) |
373
|
0 |
0 |
unless &$filter() |
375
|
0 |
80 |
wantarray ? : |
398
|
83 |
646 |
if @parts < 2 |
423
|
16 |
15 |
ref $_[0] eq 'HASH' ? : |
432
|
16 |
201 |
exists $passed_parms{$key} ? : |
442
|
1 |
29 |
if ($parms->{'sort_files'} and ref $parms->{'sort_files'} ne 'CODE') |
452
|
22 |
9 |
$is_dir ? : |
475
|
0 |
59 |
unless (opendir $dh, $dirname) |
486
|
12 |
367 |
if (not $follow_symlinks) { } |
487
|
2 |
10 |
if -l $fullpath |
497
|
36 |
341 |
if ($descend_filter) |
498
|
6 |
30 |
if ($is_dir) |
501
|
3 |
3 |
unless &$descend_filter() |
509
|
13 |
46 |
if ($sort_sub) |