| line |
true |
false |
branch |
|
29
|
8 |
0 |
if defined $$attrib{'DEBUG'} |
|
33
|
0 |
8 |
unless ($impclass) |
|
46
|
0 |
0 |
unless $dbtype |
|
61
|
0 |
8 |
if (ref $self) |
|
65
|
8 |
0 |
defined $server ? : |
|
66
|
8 |
0 |
defined $dbtype ? : |
|
68
|
0 |
8 |
if ($impclass) |
|
72
|
4 |
4 |
if $ic = $ImplementedBy{$modclass} |
|
80
|
4 |
0 |
if ($ic) |
|
89
|
8 |
8 |
if (@_ > 1) { } |
|
92
|
8 |
8 |
unless (defined @{"${ic}::ISA";}) |
|
97
|
0 |
8 |
if $Debug |
|
98
|
0 |
8 |
unless defined @{"${ic}::ISA";} |
|
118
|
0 |
0 |
if defined $$self{$_} |
|
126
|
8 |
0 |
unless $val |
|
134
|
0 |
0 |
if $Debug |
|
135
|
0 |
0 |
unless defined $key and defined $file |
|
141
|
0 |
0 |
unless tie %{$$self{$key};}, $d, $f, $fl, $m |
|
168
|
0 |
0 |
if defined $dbmf |
|
170
|
0 |
0 |
unless ($dbmpack = $DBMFiles{$$self{'DBMF'}}) |
|
172
|
0 |
0 |
unless $self->load($dbmpack) |
|
182
|
4 |
4 |
unless $$self{'LOCKING'} |
|
185
|
0 |
4 |
unless ($file = $file || "$$self{'DB'}.lock") |
|
188
|
0 |
4 |
unless (-w dirname($$self{'_LOCKFILE'} = $file)) |
|
189
|
0 |
0 |
if $Debug |
|
193
|
0 |
0 |
if $Debug |
|
196
|
0 |
4 |
unless $file =~ /^([^<>;|]+)$/ |
|
198
|
0 |
4 |
unless open $FH, ">$file" |
|
202
|
0 |
0 |
if (--$timeout < 0) |
|
207
|
0 |
4 |
if $Debug |
|
213
|
2 |
2 |
unless $$self{'LOCKING'} |
|
218
|
0 |
2 |
if $Debug |
|
225
|
0 |
0 |
if defined $$self{'TMPDIR'} |
|
228
|
0 |
0 |
if -d ($dir = $_) |
|
235
|
0 |
0 |
unless ref $_[0] |
|
246
|
0 |
19 |
unless defined $DBMFlags{$key} |
|
247
|
19 |
0 |
if (defined $DBMFlags{$key}{$mode}) |