| line |
true |
false |
branch |
|
25
|
0 |
42 |
if ($^O eq 'MSWin32') { }
|
|
39
|
384 |
0 |
unless $DEBUG
|
|
48
|
0 |
0 |
if (not defined $_) { }
|
|
|
0 |
0 |
elsif (ref $_) { }
|
|
80
|
0 |
177 |
if (not defined $current) { }
|
|
|
32 |
145 |
elsif (ref $current eq 'SCALAR' and $current == $DEEPFLAG) { }
|
|
|
0 |
145 |
elsif (ref $current eq 'SCALAR' and $current == $PARENTFLAG) { }
|
|
|
51 |
94 |
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
|
42 |
150 |
if (ref $node eq 'SCALAR') { }
|
|
|
150 |
0 |
elsif (not $node =~ m[/$]) { }
|
|
116
|
42 |
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 |
192 |
if (ref $regexp eq 'SCALAR' and $regexp == $DIRFLAG) { }
|
|
135
|
0 |
0 |
if ($rest) { }
|
|
151
|
42 |
150 |
if (ref $node eq 'SCALAR' and $$node eq 1) { }
|
|
|
0 |
150 |
elsif (ref $node eq 'SCALAR' and $$node eq 0) { }
|
|
160
|
0 |
192 |
unless (opendir my $dirh, $dir)
|
|
166
|
384 |
1395 |
if $child eq "." or $child eq ".."
|
|
169
|
177 |
90 |
if ($child =~ /$regexp/ and $full = $prefix . $child and !$non_leaf_p || -d $full)
|
|
171
|
88 |
89 |
if ($rest) { }
|
|
188
|
42 |
0 |
$path[0] eq '' ? :
|
|
189
|
42 |
0 |
if ($is_absolute)
|
|
192
|
0 |
42 |
if ($^O eq "MSWin32" and $path[0] =~ /^[a-zA-Z]\:$/)
|
|
197
|
32 |
136 |
if ($_ eq '**') { }
|
|
|
0 |
136 |
elsif ($_ eq '') { }
|
|
|
0 |
136 |
elsif ($_ eq '.') { }
|
|
|
0 |
136 |
elsif ($_ eq '..') { }
|
|
|
0 |
136 |
elsif ($^O eq 'MSWin32' and $_ =~ /^[a-zA-Z]\:$/) { }
|
|
219
|
0 |
136 |
$NOCASE ? :
|
|
228
|
136 |
965 |
if ($first_byte)
|
|
229
|
136 |
0 |
if ($STRICT_LEADING_DOT)
|
|
230
|
136 |
0 |
unless $_ eq "."
|
|
234
|
0 |
1101 |
if ($_ eq "/")
|
|
237
|
31 |
1070 |
if ($_ eq '.' or $_ eq '(' or $_ eq ')' or $_ eq '|' or $_ eq '+' or $_ eq '^' or $_ eq '$' or $_ eq '@' or $_ eq '%') { }
|
|
|
38 |
1032 |
elsif ($_ eq '*') { }
|
|
|
0 |
1032 |
elsif ($_ eq '?') { }
|
|
|
0 |
1032 |
elsif ($_ eq '{') { }
|
|
|
0 |
1032 |
elsif ($_ eq '}' and $in_curlies) { }
|
|
|
0 |
1032 |
elsif ($_ eq ',' and $in_curlies) { }
|
|
|
0 |
1032 |
elsif ($_ eq '\\') { }
|
|
242
|
38 |
0 |
$STRICT_WILDCARD_SLASH ? :
|
|
|
0 |
38 |
$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) { }
|