| blib/lib/IO/Easy/Dir.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 22 | 68.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 64 | 8 | 0 | 0 | $filter ne '\\.$' and not $file_name =~ /$filter/i |
| 114 | 12 | 2 | 1 | $flag eq 'for_files_only' and -f $file |
| line | l | !l | condition |
|---|---|---|---|
| 50 | 0 | 8 | shift() || '' |
| 51 | 0 | 8 | shift() || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 20 | 0 | 0 | 0 | $ENV{'USERPROFILE'} || $ENV{'HOME'} || (getpwuid $<)[7] |
| 109 | 10 | 10 | 15 | $file_name eq $FS->curdir or $file_name eq $FS->updir |
| 114 | 1 | 12 | 2 | $flag eq 'for_files_only' and -f $file or $flag ne 'for_files_only' |
| 117 | 8 | 3 | 4 | $return or $flag eq 'ignoring_return' |