Branch Coverage

blib/lib/DBI/ProfileDumper.pm
Criterion Covered Total %
branch 27 40 67.5


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')) { }