| line |
true |
false |
branch |
|
49
|
3 |
1 |
unless not -l $path and -e _ |
|
54
|
1 |
4 |
unless -l $path |
|
58
|
4 |
0 |
if ($path =~ m[(.+)/(.+)]s) { } |
|
60
|
0 |
4 |
unless defined $path |
|
71
|
1 |
7 |
unless -d $dir |
|
72
|
0 |
7 |
unless opendir my $dh, $dir |
|
74
|
12 |
6 |
if $e eq "." or $e eq ".." |
|
82
|
2 |
8 |
unless -d $dir |
|
83
|
0 |
8 |
unless opendir my $dh, $dir |
|
85
|
12 |
6 |
if $e eq "." or $e eq ".." |
|
95
|
1 |
10 |
unless -d $dir |
|
96
|
0 |
10 |
unless opendir my $dh, $dir |
|
98
|
14 |
9 |
if $e eq "." or $e eq ".." |
|
99
|
4 |
5 |
unless -f "$dir/$e" |
|
107
|
1 |
7 |
unless -d $dir |
|
108
|
0 |
7 |
unless opendir my $dh, $dir |
|
111
|
9 |
8 |
if $e eq "." or $e eq ".." |
|
112
|
3 |
5 |
unless -f "$dir/$e" |
|
115
|
3 |
1 |
$has_files ? : |
|
120
|
1 |
10 |
unless -d $dir |
|
121
|
0 |
10 |
unless opendir my $dh, $dir |
|
123
|
18 |
10 |
if $e eq "." or $e eq ".." |
|
124
|
6 |
4 |
unless $e =~ /\A\./ |
|
125
|
1 |
3 |
unless -f "$dir/$e" |
|
133
|
1 |
6 |
unless -d $dir |
|
134
|
0 |
6 |
unless opendir my $dh, $dir |
|
137
|
5 |
5 |
if $e eq "." or $e eq ".." |
|
138
|
3 |
2 |
unless $e =~ /\A\./ |
|
139
|
1 |
1 |
unless -f "$dir/$e" |
|
142
|
1 |
1 |
$has_dot_files ? : |
|
147
|
1 |
10 |
unless -d $dir |
|
148
|
0 |
10 |
unless opendir my $dh, $dir |
|
150
|
16 |
9 |
if $e eq "." or $e eq ".." |
|
151
|
3 |
6 |
if $e =~ /\A\./ |
|
152
|
3 |
3 |
unless -f "$dir/$e" |
|
160
|
1 |
6 |
unless -d $dir |
|
161
|
0 |
6 |
unless opendir my $dh, $dir |
|
164
|
9 |
6 |
if $e eq "." or $e eq ".." |
|
165
|
3 |
3 |
if $e =~ /\A\./ |
|
166
|
1 |
2 |
unless -f "$dir/$e" |
|
169
|
1 |
1 |
$has_nondot_files ? : |
|
174
|
1 |
11 |
unless -d $dir |
|
175
|
0 |
11 |
unless opendir my $dh, $dir |
|
177
|
19 |
10 |
if $e eq "." or $e eq ".." |
|
178
|
6 |
4 |
if -l "$dir/$e" |
|
179
|
2 |
2 |
unless -d _ |
|
187
|
1 |
8 |
unless -d $dir |
|
188
|
0 |
8 |
unless opendir my $dh, $dir |
|
190
|
14 |
7 |
if $e eq "." or $e eq ".." |
|
191
|
3 |
4 |
if -l "$dir/$e" |
|
192
|
2 |
2 |
unless -d _ |
|
199
|
1 |
5 |
unless -d $dir |
|
200
|
0 |
5 |
unless opendir my $dh, $dir |
|
202
|
9 |
4 |
if $e eq "." or $e eq ".." |
|
203
|
2 |
2 |
unless $e =~ /\A\./ |
|
204
|
0 |
2 |
if -l "$dir/$e" |
|
205
|
1 |
1 |
unless -d _ |
|
213
|
1 |
5 |
unless -d $dir |
|
214
|
0 |
5 |
unless opendir my $dh, $dir |
|
216
|
8 |
4 |
if $e eq "." or $e eq ".." |
|
217
|
2 |
2 |
if $e =~ /\A\./ |
|
218
|
0 |
2 |
if -l "$dir/$e" |
|
219
|
1 |
1 |
unless -d _ |
|
228
|
0 |
2 |
unless opendir my $dh, $dir |
|
229
|
7 |
2 |
if $_ ne "." |
|
237
|
0 |
1 |
unless opendir my $dh, $dir |
|
238
|
4 |
2 |
if $_ ne "." and $_ ne ".." |
|
246
|
0 |
1 |
unless opendir my $dh, $dir |
|
247
|
4 |
2 |
if $_ ne "." and $_ ne ".." |
|
255
|
0 |
1 |
unless opendir my $dh, $dir |
|
256
|
2 |
3 |
if $_ ne "." and $_ ne ".." and /\A\./ |
|
264
|
0 |
1 |
unless opendir my $dh, $dir |
|
265
|
2 |
3 |
if $_ ne "." and $_ ne ".." and not /\A\./ |
|
273
|
0 |
2 |
unless opendir my $dh, $dir |
|
274
|
5 |
2 |
if $_ ne "." and $_ ne ".." and not -l $_ |
|
282
|
0 |
2 |
unless opendir my $dh, $dir |
|
283
|
5 |
4 |
if $_ ne "." and $_ ne ".." |
|
291
|
0 |
1 |
unless opendir my $dh, $dir |
|
292
|
2 |
2 |
if $_ ne "." and $_ ne ".." and /\A\./ and not -l $_ |
|
300
|
0 |
1 |
unless opendir my $dh, $dir |
|
301
|
2 |
2 |
if $_ ne "." and $_ ne ".." and not /\A\./ and not -l $_ |