line |
true |
false |
branch |
76
|
18 |
17 |
if (@params < 2) |
77
|
18 |
0 |
defined $_[0] ? : |
101
|
66 |
0 |
defined $_[0] ? : |
125
|
0 |
17 |
unless my $file = $self->_path(shift()) |
142
|
0 |
6 |
unless my $dir = $self->_path(shift()) |
161
|
0 |
21 |
unless my $file = $self->_path(shift()) |
163
|
1 |
20 |
unless my $content = 'File::Flat'->slurp($file) |
179
|
0 |
18 |
unless my $file = $self->_path(shift()) |
180
|
0 |
18 |
if (-f $file and not -w $file) |
181
|
0 |
0 |
unless &File::Remove::remove($file) |
186
|
8 |
10 |
if ($rv and $self->readonly) |
208
|
2 |
0 |
defined $_[0] ? : |
210
|
1 |
1 |
if $self->exists_file($file) |
228
|
4 |
1 |
$self->exists_dir($_[0]) ? : |