| line |
true |
false |
branch |
|
25
|
0 |
43 |
if ($^O eq 'MSWin32') { }
|
|
39
|
392 |
0 |
unless $DEBUG
|
|
48
|
0 |
0 |
if (not defined $_) { }
|
|
|
0 |
0 |
elsif (ref $_) { }
|
|
80
|
0 |
181 |
if (not defined $current) { }
|
|
|
33 |
148 |
elsif (ref $current eq 'SCALAR' and $current == $DEEPFLAG) { }
|
|
|
0 |
148 |
elsif (ref $current eq 'SCALAR' and $current == $PARENTFLAG) { }
|
|
|
52 |
96 |
elsif (@rest == 0) { }
|
|
87
|
0 |
0 |
if (ref $node eq 'SCALAR' and $$node eq 1) { }
|
|
|
0 |
0 |
elsif (ref $node eq 'SCALAR' and $$node eq 0) { }
|
|
115
|
43 |
153 |
if (ref $node eq 'SCALAR') { }
|
|
|
153 |
0 |
elsif (not $node =~ m[/$]) { }
|
|
116
|
43 |
0 |
if ($$node eq 1) { }
|
|
|
0 |
0 |
elsif ($$node eq '0') { }
|
|
131
|
0 |
0 |
if ($^O eq "MSWin32" and ref $regexp eq "SCALAR" and $$regexp =~ /^[a-zA-Z]\:$/)
|
|
134
|
0 |
196 |
if (ref $regexp eq 'SCALAR' and $regexp == $DIRFLAG) { }
|
|
135
|
0 |
0 |
if ($rest) { }
|
|
151
|
43 |
153 |
if (ref $node eq 'SCALAR' and $$node eq 1) { }
|
|
|
0 |
153 |
elsif (ref $node eq 'SCALAR' and $$node eq 0) { }
|
|
160
|
0 |
196 |
unless (opendir my $dirh, $dir)
|
|
166
|
392 |
1425 |
if $child eq "." or $child eq ".."
|
|
169
|
180 |
91 |
if ($child =~ /$regexp/ and $full = $prefix . $child and !$non_leaf_p || -d $full)
|
|
171
|
90 |
90 |
if ($rest) { }
|
|
188
|
43 |
0 |
$path[0] eq '' ? :
|
|
189
|
43 |
0 |
if ($is_absolute)
|
|
192
|
0 |
43 |
if ($^O eq "MSWin32" and $path[0] =~ /^[a-zA-Z]\:$/)
|
|
197
|
33 |
139 |
if ($_ eq '**') { }
|
|
|
0 |
139 |
elsif ($_ eq '') { }
|
|
|
0 |
139 |
elsif ($_ eq '.') { }
|
|
|
0 |
139 |
elsif ($_ eq '..') { }
|
|
|
0 |
139 |
elsif ($^O eq 'MSWin32' and $_ =~ /^[a-zA-Z]\:$/) { }
|
|
219
|
0 |
139 |
$NOCASE ? :
|
|
228
|
139 |
987 |
if ($first_byte)
|
|
229
|
139 |
0 |
if ($STRICT_LEADING_DOT)
|
|
230
|
139 |
0 |
unless $_ eq "."
|
|
234
|
0 |
1126 |
if ($_ eq "/")
|
|
237
|
32 |
1094 |
if ($_ eq '.' or $_ eq '(' or $_ eq ')' or $_ eq '|' or $_ eq '+' or $_ eq '^' or $_ eq '$' or $_ eq '@' or $_ eq '%') { }
|
|
|
39 |
1055 |
elsif ($_ eq '*') { }
|
|
|
0 |
1055 |
elsif ($_ eq '?') { }
|
|
|
0 |
1055 |
elsif ($_ eq '{') { }
|
|
|
0 |
1055 |
elsif ($_ eq '}' and $in_curlies) { }
|
|
|
0 |
1055 |
elsif ($_ eq ',' and $in_curlies) { }
|
|
|
0 |
1055 |
elsif ($_ eq '\\') { }
|
|
242
|
39 |
0 |
$STRICT_WILDCARD_SLASH ? :
|
|
|
0 |
39 |
$escaping ? :
|
|
246
|
0 |
0 |
$STRICT_WILDCARD_SLASH ? :
|
|
|
0 |
0 |
$escaping ? :
|
|
250
|
0 |
0 |
$escaping ? :
|
|
251
|
0 |
0 |
unless $escaping
|
|
254
|
0 |
0 |
$escaping ? :
|
|
255
|
0 |
0 |
unless $escaping
|
|
258
|
0 |
0 |
$escaping ? :
|
|
261
|
0 |
0 |
if ($escaping) { }
|