| line |
true |
false |
branch |
|
145
|
0 |
13 |
if ($handle_tilde and $word =~ s[\A(~[^/]*)/][]) { } |
|
|
0 |
13 |
elsif ($allow_dot and $word =~ s[\A((?:\.\.?/+)+|/+)][]) { } |
|
148
|
0 |
0 |
unless @dir |
|
154
|
0 |
0 |
unless $starting_path =~ m[\A/] |
|
158
|
0 |
13 |
if not $allow_dot and $word =~ m[(?:\A|/)\.\.?(?:\z|/)] |
|
164
|
0 |
24 |
unless opendir my $dh, $path |
|
168
|
20 |
186 |
if $_ eq '.' || $_ eq '..' and $intdir eq '' |
|
169
|
28 |
158 |
if $isint and not -d "$path/$_" |
|
179
|
2 |
11 |
if ($args{'filter'} and not ref $args{'filter'}) { } |
|
|
1 |
20 |
elsif ($args{'filter'} and ref $args{'filter'} eq 'CODE') { } |
|
183
|
0 |
6 |
unless my(@st) = stat $name |
|
190
|
3 |
1 |
$_[0] ? : |
|
|
4 |
7 |
if ($c eq '-') { } |
|
|
0 |
7 |
elsif ($c eq 'r') { } |
|
|
0 |
7 |
elsif ($c eq 'w') { } |
|
|
0 |
7 |
elsif ($c eq 'x') { } |
|
|
1 |
6 |
elsif ($c eq 'f') { } |
|
|
6 |
0 |
elsif ($c eq 'd') { } |
|
191
|
0 |
0 |
unless &$neg($mode & 256) |
|
192
|
0 |
0 |
unless &$neg($mode & 128) |
|
193
|
0 |
0 |
unless &$neg($mode & 64) |
|
194
|
1 |
0 |
unless &$neg($mode & 32768) |
|
195
|
3 |
3 |
unless &$neg($mode & 16384) |
|
210
|
1 |
12 |
if ($args{'file_regex_filter'}) |
|
213
|
4 |
7 |
if -d $name |
|
214
|
0 |
7 |
unless -f _ |
|
215
|
2 |
5 |
if $name =~ /$args{'file_regex_filter'}/ |
|
222
|
1 |
12 |
if ($args{'file_ext_filter'} and ref $args{'file_ext_filter'} eq 'Regexp') { } |
|
|
1 |
22 |
elsif ($args{'file_ext_filter'} and ref $args{'file_ext_filter'} eq 'ARRAY') { } |
|
225
|
0 |
3 |
if -d $name |
|
226
|
0 |
3 |
unless -f _ |
|
227
|
3 |
0 |
$name =~ /\.(\w+)\z/ ? : |
|
228
|
2 |
1 |
if $ext =~ /$args{'file_ext_filter'}/ |
|
234
|
0 |
3 |
if -d $name |
|
235
|
0 |
3 |
unless -f _ |
|
236
|
3 |
0 |
$name =~ /\.(\w+)\z/ ? : |
|
237
|
0 |
3 |
if ($Complete::Common::OPT_CI) { } |
|
240
|
0 |
0 |
if $ext eq lc $e |
|
244
|
2 |
3 |
if $ext eq $e |
|
253
|
1 |
12 |
if ($args{'_dir'}) |
|
254
|
7 |
3 |
unless -d $_[0] |
|
259
|
1 |
12 |
if ($args{'exclude_dir'}) |
|
260
|
2 |
1 |
if -d $_[0] |
|
266
|
7 |
3 |
unless &$filter_dir($name) |
|
|
10 |
60 |
if ($filter_dir) |
|
267
|
2 |
1 |
unless &$filter_xdir($name) |
|
|
3 |
60 |
if ($filter_xdir) |
|
268
|
13 |
4 |
unless &$filter($name) |
|
|
17 |
44 |
if ($filter) |
|
269
|
5 |
6 |
unless &$filter_fregex($name) |
|
|
11 |
37 |
if ($filter_fregex) |
|
270
|
2 |
4 |
unless &$filter_fext($name) |
|
|
6 |
37 |
if ($filter_fext) |