| lib/Sys/Filesystem/MountPoint.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 24 | 66.6 |
| line | true | false | branch |
|---|---|---|---|
| 12 | 314 | 0 | unless $Sys::Filesystem::MountPoint::DEBUG |
| 19 | 0 | 295 | unless $_[0] |
| 20 | 40 | 255 | grep({$_[0] eq $_;} _f()->filesystems) ? : |
| 26 | 0 | 42 | unless my $arg = $_[0] |
| 29 | 2 | 40 | unless my $abs = Cwd::abs_path($arg) |
| 40 | 40 | 234 | if is_mount_point($subpath) |
| 42 | 0 | 234 | if $subpath eq '/' |
| 44 | 194 | 40 | unless $subpath =~ s[^/[^/]+$][/] |
| 54 | 0 | 35 | unless my $arg = $_[0] |
| 57 | 0 | 595 | if _f()->device($mnt) eq $arg |
| 66 | 0 | 20 | unless my $arg = $_[0] |
| 67 | 20 | 0 | unless is_mount_point($arg) or dev_to_mount_point($arg) |