| line |
true |
false |
branch |
|
53
|
12 |
116 |
if (/$bracepat/) { } |
|
69
|
116 |
0 |
if defined $_ |
|
73
|
4 |
111 |
if (/^\~([^\Q$dirsep\E]*)/) { } |
|
76
|
2 |
2 |
if ($usr eq '') { } |
|
79
|
0 |
2 |
unless (defined $usrdir) |
|
80
|
0 |
0 |
defined $ENV{'HOME'} ? : |
|
86
|
3 |
1 |
if (defined $usrdir and $usrdir ne "") |
|
101
|
28 |
87 |
unless (/(?
|
|
111
|
0 |
87 |
if ($IS_WINDOWS) { } |
|
119
|
3 |
84 |
$is_rooted ? : |
|
123
|
98 |
82 |
if ($comp =~ /(?
|
|
144
|
0 |
87 |
if $verbose |
|
146
|
3 |
84 |
if ($is_rooted) { } |
|
163
|
0 |
186 |
if (@comps == 0) { } |
|
|
2 |
184 |
elsif ($comps[0] eq '') { } |
|
177
|
0 |
184 |
unless (opendir $dh, $dir) |
|
178
|
0 |
0 |
if $verbose |
|
188
|
164 |
20 |
if ($hidedotfiles and not $re =~ /\A\\A\\\./) |
|
195
|
0 |
184 |
if $verbose |
|
197
|
0 |
184 |
unless (defined $regex) |
|
201
|
0 |
3166 |
if $verbose |
|
202
|
1014 |
2152 |
if (/$regex/) |
|
203
|
121 |
893 |
if ($#comps > -1) { } |
|
207
|
97 |
24 |
if (-d $subdir) |