line |
true |
false |
branch |
202
|
0 |
6 |
unless $self->filename |
204
|
0 |
6 |
if $$self{'Trace'} and $$self{'Trace'} >= 2 |
214
|
0 |
28 |
if @_ |
216
|
0 |
28 |
if ref $filename eq 'CODE' |
229
|
2 |
20 |
if (not $data or ref $data eq 'HASH' and not %$data) |
230
|
0 |
2 |
if $$self{'Trace'} |
236
|
14 |
6 |
if (($$self{'_wrote_header'} || '') eq $filename) { } |
239
|
0 |
14 |
unless open $fh, '>>', $filename |
243
|
2 |
4 |
if (-f $filename) |
246
|
0 |
2 |
unless rename $filename, $bak |
249
|
0 |
6 |
unless open $fh, '>', $filename |
253
|
20 |
0 |
if $$self{'LockFile'} |
256
|
6 |
14 |
if (-s $fh == 0) |
257
|
0 |
6 |
if $$self{'Trace'} |
263
|
0 |
20 |
if $$self{'Trace'} |
265
|
0 |
20 |
unless close $fh |
289
|
2 |
4 |
unless $$self{'Path'} |
293
|
4 |
2 |
unless ($program_header) |
312
|
0 |
56 |
unless $data and UNIVERSAL::isa($data, 'HASH') |
321
|
114 |
36 |
if (UNIVERSAL::isa($value, 'ARRAY')) { } |