| line |
true |
false |
branch |
|
41
|
0 |
0 |
if (-d "$path" and not -l "$path") { } |
|
44
|
0 |
0 |
unless 'Fault::Logger'->assertion_check(!opendir($fh, "$path"), undef, "Can not open '${path}': $!") |
|
54
|
0 |
0 |
if $new eq '.' |
|
55
|
0 |
0 |
if $new eq '..' |
|
62
|
0 |
0 |
unless defined $entry |
|
74
|
0 |
0 |
if (not exists $$self{'filehash'}{$key}) { } |
|
123
|
0 |
0 |
if ($main::DEBUG) |
|
124
|
0 |
0 |
unless 'Fault::Logger'->arg_check_noref($formatline, 'formatline') |
|
128
|
0 |
0 |
unless $fmt->init($formatline) |
|
132
|
0 |
0 |
if /^\w*$/ |
|
135
|
0 |
0 |
unless $entry->initFromLine($$self{'format'}, $_) |
|
148
|
0 |
0 |
if ($main::DEBUG) |
|
149
|
0 |
0 |
unless 'Fault::Logger'->arg_check_noref($formatline, 'formatline') |
|
150
|
0 |
0 |
unless 'Fault::Logger'->arg_check_noref($listfname, 'listfname') |
|
154
|
0 |
0 |
unless 'Fault::Logger'->assertion_check(!open($fh, "<$listfname"), undef, "Can not open '${listfname}': $!") |
|
168
|
0 |
0 |
if ($main::DEBUG) |
|
169
|
0 |
0 |
unless 'Fault::Logger'->arg_check_noref($path, 'path') |
|
184
|
0 |
0 |
if ($main::DEBUG) |
|
185
|
0 |
0 |
unless 'Fault::Logger'->arg_check_isa($old, 'FileHash::Base', 'oldfilehash') |
|
203
|
0 |
0 |
if ($main::DEBUG) |
|
204
|
0 |
0 |
unless 'Fault::Logger'->arg_check_noref($path, 'path') |
|
208
|
0 |
0 |
unless 'Fault::Logger'->assertion_check(!open($fh, "<$path"), undef, "Can not open '${path}': $!") |
|
212
|
0 |
0 |
if (/^Version:/) { } |
|
222
|
0 |
0 |
unless $entry->addFromDump($fh) |
|
240
|
0 |
0 |
unless $fhb->init |
|
244
|
0 |
0 |
if ($#$v1 > 0) |
|
259
|
0 |
0 |
unless $fhb->init |
|
263
|
0 |
0 |
if ($#$v1 == 0) |
|
279
|
0 |
0 |
if ($main::DEBUG) |
|
280
|
0 |
0 |
unless 'Fault::Logger'->arg_check_isa($fhb, $class, 'fhb') |
|
284
|
0 |
0 |
unless $fhc->init |
|
288
|
0 |
0 |
unless (exists $$b{$k}) |
|
293
|
0 |
0 |
unless (exists $$a{$k}) |
|
307
|
0 |
0 |
if ($main::DEBUG) |
|
308
|
0 |
0 |
unless 'Fault::Logger'->arg_check_isa($fhb, $class, 'fhb') |
|
312
|
0 |
0 |
unless $fhc->init |
|
316
|
0 |
0 |
if (exists $$b{$k}) |
|
332
|
0 |
0 |
if ($main::DEBUG) |
|
333
|
0 |
0 |
unless 'Fault::Logger'->arg_check_isa($fhb, $class, 'fhb') |
|
337
|
0 |
0 |
unless $fhc->init |
|
341
|
0 |
0 |
unless (exists $$b{$k}) |
|
354
|
0 |
0 |
if ($main::DEBUG) |
|
355
|
0 |
0 |
unless 'Fault::Logger'->arg_check_noref($dumpfile, 'dumpfile') |
|
359
|
0 |
0 |
unless 'Fault::Logger'->assertion_check(!open($fh, ">$dumpfile"), undef, "Can not open '${dumpfile}': $!") |
|
362
|
0 |
0 |
unless (printf $fh 'Version: ' . 'FileHash::Entry'->dumpversion . "\n") |