| line |
true |
false |
branch |
|
10
|
0 |
0 |
if ($^O ne 'linux') |
|
13
|
0 |
0 |
unless (-d $$self{'basedir'}) |
|
24
|
0 |
0 |
unless (defined $files[0]) |
|
28
|
0 |
0 |
unless (defined $t) |
|
31
|
0 |
0 |
if ($t eq 'file') |
|
45
|
0 |
0 |
unless ($self->type($key) eq 'file') |
|
51
|
0 |
0 |
if (-d $self->file(@_)) { } |
|
|
0 |
0 |
elsif (-f $self->file(@_)) { } |
|
63
|
0 |
0 |
if (@_) |
|
72
|
0 |
0 |
unless ($self->type eq 'dir') |
|
84
|
0 |
0 |
unless ($self->type(@_) eq 'file') |
|
85
|
0 |
0 |
unless open DUS, $self->file(@_) |
|
96
|
0 |
0 |
unless ($self->type(@_) eq 'file') |
|
97
|
0 |
0 |
unless open DUS, '>' . $self->file(@_) |