line |
true |
false |
branch |
68
|
0 |
0 |
if ($self->is_root) { } |
72
|
0 |
0 |
unless $self->is_container and $result = $result->child($component) |
105
|
132 |
2090 |
unless @open_list |
130
|
644 |
499 |
@_ ? : |
132
|
176 |
967 |
unless ref $_ |
139
|
992 |
4077 |
if &$want($file) |
141
|
2765 |
2304 |
if not $File::System::prune and $file->is_container |
195
|
4654 |
0 |
if (UNIVERSAL::isa($obj, 'File::System::Object')) { } |
206
|
0 |
0 |
if (UNIVERSAL::isa($obj, 'File::System::Object')) { } |
217
|
2354 |
0 |
if (UNIVERSAL::isa($obj, 'File::System::Object')) { } |
657
|
0 |
123386 |
unless defined $path |
661
|
52295 |
71091 |
if (ref $self and not $path =~ m[^/]) |
663
|
0 |
52295 |
unless $self->is_container |
672
|
17159 |
106227 |
unless @components |
673
|
0 |
123386 |
unless @components > 1 |
676
|
4609 |
159045 |
if ($components[$i] eq '.') { } |
|
1607 |
157438 |
elsif ($components[$i] eq '..' and $i == 1) { } |
|
2998 |
154440 |
elsif ($components[$i] eq '..') { } |
688
|
4920 |
118466 |
unless @components > 1 |
711
|
6142 |
12334 |
if $str =~ /^\./ and not $glob =~ /^\./ |
718
|
1054 |
24278 |
if (ref $el eq 'File::System::Glob::MatchOne') { } |
|
1268 |
23010 |
elsif (ref $el eq 'File::System::Glob::MatchAny') { } |
|
1208 |
21802 |
elsif (ref $el eq 'File::System::Glob::MatchAlternative') { } |
|
40 |
21762 |
elsif (ref $el eq 'File::System::Glob::MatchCollection') { } |
719
|
396 |
658 |
unless substr $str, 0, 1, '' |
725
|
122 |
2230 |
if ($alt eq substr($str, 0, length $alt)) |
732
|
1086 |
122 |
unless $match |
738
|
20 |
38 |
if (ref $class and $char ge $$class[0] and $char le $$class[1]) { } |
|
18 |
20 |
elsif ($char eq $class) { } |
747
|
2 |
38 |
unless $match |
751
|
9368 |
12394 |
unless $char eq $$el{'character'} |
754
|
13484 |
996 |
unless $str and not @$tree |
758
|
10012 |
2038 |
unless @backup |
784
|
12 |
5447 |
if ($path eq '/') { } |
802
|
108 |
9616 |
if ($path eq '/') { } |
807
|
5688 |
3928 |
if @components == 1 |