| line |
true |
false |
branch |
|
70
|
0 |
0 |
unless defined $filename and length $filename |
|
71
|
0 |
0 |
if $filename =~ m[/] |
|
72
|
0 |
0 |
if $filename eq '..' |
|
73
|
0 |
0 |
if $filename eq '.' |
|
78
|
0 |
0 |
if (-d _) |
|
83
|
0 |
0 |
if (-e _) |
|
128
|
0 |
0 |
if ($wildcard) |
|
134
|
0 |
0 |
unless my $dir = 'IO::Dir'->new($self->{'_pathname'}) |
|
141
|
0 |
0 |
if $file eq '.' or $file eq '..' |
|
142
|
0 |
0 |
if $wildcard and not $file =~ /$wildcard/ |
|
154
|
0 |
0 |
if (my $handle = $self->get($file)) |
|
231
|
0 |
0 |
unless defined $dev |
|
242
|
0 |
0 |
-c _ ? : |
|
|
0 |
0 |
-b _ ? : |
|
|
0 |
0 |
-S _ ? : |
|
|
0 |
0 |
-p _ ? : |
|
|
0 |
0 |
-l _ ? : |
|
|
0 |
0 |
-d _ ? : |
|
|
0 |
0 |
-f _ ? : |
|
317
|
0 |
0 |
if $filename =~ m[/] |
|
319
|
0 |
0 |
unless $mode eq 'r' |