| line |
true |
false |
branch |
|
44
|
5 |
12 |
$format =~ /^ext\d$/ ? : |
|
53
|
0 |
68 |
if ($arg eq $mnt) |
|
56
|
0 |
68 |
if ($Sys::Filesystem::ID::FS{$mnt}{'dev'} eq $arg) |
|
67
|
0 |
4 |
if ($argtype eq 'mnt') { } |
|
|
0 |
4 |
elsif ($argtype eq 'dev') { } |
|
|
4 |
0 |
elsif ($argtype eq 'path') { } |
|
83
|
0 |
0 |
unless defined $arg |
|
86
|
0 |
0 |
if ($Sys::Filesystem::ID::FS{$mnt}{'dev'} eq $arg) |
|
98
|
0 |
4 |
unless my $abs = Cwd::abs_path($arg) |
|
106
|
4 |
20 |
if exists $Sys::Filesystem::ID::FS{$subpath} |
|
108
|
0 |
20 |
if $subpath eq '/' |
|
111
|
16 |
4 |
unless $subpath =~ s[^/[^/]+$][/] |
|
121
|
0 |
4 |
unless my $mnt = _arg_to_mount_point($arg) |
|
127
|
0 |
2 |
unless my $abs_id = _abs_id_by_arg($arg) |
|
128
|
1 |
1 |
unless my $id = _read_idfile($abs_id) |
|
133
|
2 |
0 |
(shift()) =~ /^.+$/ ? : |
|
138
|
1 |
1 |
unless -f $abs_id |
|
140
|
0 |
1 |
unless open FILE, '<', $abs_id |
|
144
|
0 |
1 |
unless _id_string_is_ok($id) |
|
170
|
0 |
1 |
unless my $abs_id = _abs_id_by_arg($arg) |
|
171
|
0 |
1 |
if -f $abs_id |
|
174
|
0 |
1 |
unless _id_string_is_ok($id) |
|
176
|
0 |
1 |
unless open FILE, '>', $abs_id |