| line |
true |
false |
branch |
|
25
|
0 |
19 |
if ($^O eq 'MSWin32') { } |
|
39
|
164 |
0 |
unless $DEBUG |
|
48
|
0 |
0 |
if (not defined $_) { } |
|
|
0 |
0 |
elsif (ref $_) { } |
|
80
|
1 |
71 |
if (not defined $current) { } |
|
|
7 |
64 |
elsif (ref $current eq 'SCALAR' and $current == $DEEPFLAG) { } |
|
|
2 |
62 |
elsif (ref $current eq 'SCALAR' and $current == $PARENTFLAG) { } |
|
|
37 |
25 |
elsif (@rest == 0) { } |
|
87
|
0 |
2 |
if (ref $node eq 'SCALAR' and $$node eq 1) { } |
|
|
1 |
1 |
elsif (ref $node eq 'SCALAR' and $$node eq 0) { } |
|
115
|
19 |
63 |
if (ref $node eq 'SCALAR') { } |
|
|
63 |
0 |
elsif (not $node =~ m[/$]) { } |
|
116
|
1 |
18 |
if ($$node eq 1) { } |
|
|
18 |
0 |
elsif ($$node eq '0') { } |
|
131
|
0 |
0 |
if ($^O eq 'MSWin32' and ref $regexp eq 'SCALAR' and $$regexp =~ /^[a-zA-Z]\:$/) |
|
134
|
0 |
82 |
if (ref $regexp eq 'SCALAR' and $regexp == $DIRFLAG) { } |
|
135
|
0 |
0 |
if ($rest) { } |
|
151
|
1 |
81 |
if (ref $node eq 'SCALAR' and $$node eq 1) { } |
|
|
18 |
63 |
elsif (ref $node eq 'SCALAR' and $$node eq 0) { } |
|
160
|
0 |
82 |
unless (opendir my $dirh, $dir) |
|
166
|
164 |
431 |
if $child eq '.' or $child eq '..' |
|
169
|
73 |
22 |
if ($child =~ /$regexp/ and $full = $prefix . $child and !$non_leaf_p || -d $full) |
|
171
|
31 |
42 |
if ($rest) { } |
|
188
|
3 |
19 |
$path[0] eq '' ? : |
|
189
|
3 |
19 |
if ($is_absolute) |
|
192
|
0 |
22 |
if ($^O eq 'MSWin32' and $path[0] =~ /^[a-zA-Z]\:$/) |
|
197
|
8 |
52 |
if ($_ eq '**') { } |
|
|
0 |
52 |
elsif ($_ eq '') { } |
|
|
4 |
48 |
elsif ($_ eq '.') { } |
|
|
2 |
46 |
elsif ($_ eq '..') { } |
|
|
0 |
46 |
elsif ($^O eq 'MSWin32' and $_ =~ /^[a-zA-Z]\:$/) { } |
|
219
|
0 |
46 |
$NOCASE ? : |
|
228
|
46 |
112 |
if ($first_byte) |
|
229
|
46 |
0 |
if ($STRICT_LEADING_DOT) |
|
230
|
43 |
3 |
unless $_ eq '.' |
|
234
|
0 |
158 |
if ($_ eq '/') |
|
237
|
11 |
147 |
if ($_ eq '.' or $_ eq '(' or $_ eq ')' or $_ eq '|' or $_ eq '+' or $_ eq '^' or $_ eq '$' or $_ eq '@' or $_ eq '%') { } |
|
|
19 |
128 |
elsif ($_ eq '*') { } |
|
|
0 |
128 |
elsif ($_ eq '?') { } |
|
|
1 |
127 |
elsif ($_ eq '{') { } |
|
|
1 |
126 |
elsif ($_ eq '}' and $in_curlies) { } |
|
|
1 |
125 |
elsif ($_ eq ',' and $in_curlies) { } |
|
|
0 |
125 |
elsif ($_ eq '\\') { } |
|
242
|
19 |
0 |
$STRICT_WILDCARD_SLASH ? : |
|
|
0 |
19 |
$escaping ? : |
|
246
|
0 |
0 |
$STRICT_WILDCARD_SLASH ? : |
|
|
0 |
0 |
$escaping ? : |
|
250
|
0 |
1 |
$escaping ? : |
|
251
|
1 |
0 |
unless $escaping |
|
254
|
0 |
1 |
$escaping ? : |
|
255
|
1 |
0 |
unless $escaping |
|
258
|
0 |
1 |
$escaping ? : |
|
261
|
0 |
0 |
if ($escaping) { } |