Branch Coverage

blib/lib/File/Next.pm
Criterion Covered Total %
branch 63 74 85.1


line true false branch
261 2 17 if @_ and defined $_[0] and $_[0] eq 'File::Next'
269 0 44 if (-f $fullpath or -p _ or $fullpath =~ m[^/dev/fd])
270 20 185 if ($filter)
274 9 11 unless &$filter()
276 1 195 wantarray ? :
278 44 0 if (-d _)
289 2 3 if @_ and defined $_[0] and $_[0] eq 'File::Next'
296 5 39 if (-d $fullpath)
307 2 3 if @_ and defined $_[0] and $_[0] eq 'File::Next'
315 10 78 if (-d $fullpath)
318 44 44 if ($filter)
322 35 9 unless &$filter()
324 0 53 wantarray ? :
332 0 5 if @_ and defined $_[0] and $_[0] eq 'File::Next'
340 1 5 unless (defined $filename)
346 0 5 if ($filename eq '-') { }
350 1 4 unless (open $fh, '<', $filename)
358 17 51 $parms->{'nul_separated'} ? :
361 1 66 unless $fullpath =~ /./
362 2 64 unless (-f $fullpath or -p _)
368 0 64 if ($filter)
372 0 0 unless &$filter()
374 0 64 wantarray ? :
397 79 616 if @parts < 2
424 14 15 ref $_[0] eq 'HASH' ? :
433 14 189 exists $passed_parms{$key} ? :
443 1 27 if ($parms->{'sort_files'} and ref $parms->{'sort_files'} ne 'CODE')
450 22 7 if (-d $start) { }
475 0 59 unless (opendir $dh, $dirname)
489 12 367 unless ($follow_symlinks)
490 2 10 if -l $fullpath
495 36 341 if ($descend_filter)
496 0 36 $has_stat ? :
6 30 if ($has_stat ? -d _ : -d $fullpath)
499 3 3 unless &$descend_filter()
502 78 296 if ($sort_sub) { }
511 13 46 if ($sort_sub)