| line |
true |
false |
branch |
|
202
|
0 |
6 |
unless $self->filename |
|
205
|
0 |
6 |
if $self->{'Trace'} and $self->{'Trace'} >= 2 |
|
214
|
0 |
56 |
if @_ |
|
216
|
0 |
56 |
if ref $filename eq 'CODE' |
|
229
|
2 |
48 |
if (not $data or ref $data eq 'HASH' and not %$data) |
|
230
|
0 |
2 |
if $self->{'Trace'} |
|
236
|
42 |
6 |
if (($self->{'_wrote_header'} || '') eq $filename) { } |
|
239
|
0 |
42 |
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
|
48 |
0 |
if $self->{'LockFile'} |
|
256
|
6 |
42 |
if (-s $fh == 0) |
|
257
|
0 |
6 |
if $self->{'Trace'} |
|
263
|
0 |
48 |
if $self->{'Trace'} |
|
265
|
0 |
48 |
unless close $fh |
|
289
|
2 |
4 |
unless $self->{'Path'} |
|
293
|
4 |
2 |
unless ($program_header) |
|
312
|
0 |
140 |
unless $data and UNIVERSAL::isa($data, 'HASH') |
|
321
|
282 |
92 |
if (UNIVERSAL::isa($value, 'ARRAY')) { } |