| line |
true |
false |
branch |
|
12
|
4 |
12 |
if -d $path |
|
13
|
1 |
11 |
if (-e $path) |
|
15
|
7 |
4 |
if substr($mask, 0, 1) eq '0' |
|
22
|
11 |
30 |
unless defined $_dir |
|
24
|
2 |
28 |
if $_dir eq '' |
|
26
|
18 |
10 |
unless (-d $progressive) |
|
27
|
0 |
18 |
unless mkdir $progressive, $mask or -d $progressive |
|
30
|
11 |
0 |
if -d $path |
|
37
|
3 |
117 |
if (-e _ and not -d _) |
|
38
|
1 |
116 |
unless -d _ |
|
40
|
0 |
111 |
unless empty_dir($path, $fast) |
|
42
|
0 |
111 |
unless rmdir $path or not -e $path |
|
49
|
0 |
122 |
if (-e _ and not -d _) |
|
52
|
122 |
0 |
unless ($fast) |
|
55
|
0 |
122 |
unless File::Path::Tiny::chdir($path) |
|
60
|
0 |
122 |
unless opendir my $dh, $path |
|
61
|
301 |
122 |
if $_ ne '.' |
|
65
|
113 |
9 |
if @contents |
|
68
|
80 |
99 |
if (not -l $long and -d _) { } |
|
70
|
0 |
80 |
unless rm($long, $fast) or not -e $long |
|
74
|
0 |
89 |
unless unlink $long or not -e $long |
|
80
|
112 |
0 |
unless ($fast) |
|
81
|
0 |
112 |
unless File::Path::Tiny::chdir($starting_point) |
|
109
|
0 |
758 |
if (not defined $cur_dev && defined $cur_ino) { } |
|
117
|
10 |
748 |
if ($orig_dev ne $cur_dev or $orig_ino ne $cur_ino) |