| line |
true |
false |
branch |
|
29
|
43 |
0 |
if defined $$attrib{'DEBUG'} |
|
33
|
0 |
43 |
unless ($impclass) |
|
46
|
0 |
0 |
unless $dbtype |
|
61
|
0 |
43 |
if (ref $self) |
|
65
|
43 |
0 |
defined $server ? : |
|
66
|
43 |
0 |
defined $dbtype ? : |
|
69
|
0 |
43 |
if ($impclass) |
|
73
|
34 |
9 |
if $ic = $ImplementedBy{$modclass} |
|
81
|
9 |
0 |
if ($ic) |
|
90
|
18 |
43 |
if (@_ > 1) { } |
|
93
|
18 |
43 |
unless (defined @{"${ic}::ISA";}) |
|
98
|
0 |
18 |
if $Debug |
|
99
|
0 |
18 |
unless defined @{"${ic}::ISA";} |
|
119
|
0 |
0 |
if defined $$self{$_} |
|
127
|
43 |
0 |
unless $val |
|
135
|
0 |
0 |
if $Debug |
|
136
|
0 |
0 |
unless defined $key and defined $file |
|
142
|
0 |
0 |
unless tie %{$$self{$key};}, $d, $f, $fl, $m |
|
169
|
0 |
0 |
if defined $dbmf |
|
171
|
0 |
0 |
unless ($dbmpack = $DBMFiles{$$self{'DBMF'}}) |
|
173
|
0 |
0 |
unless $self->load($dbmpack) |
|
183
|
4 |
39 |
unless $$self{'LOCKING'} |
|
186
|
0 |
39 |
unless ($file = $file || "$$self{'DB'}.lock") |
|
189
|
0 |
39 |
unless (-w dirname($$self{'_LOCKFILE'} = $file)) |
|
190
|
0 |
0 |
if $Debug |
|
194
|
0 |
0 |
if $Debug |
|
197
|
0 |
39 |
unless $file =~ /^([^<>;|]+)$/ |
|
199
|
0 |
39 |
unless open $FH, ">$file" |
|
203
|
0 |
0 |
if (--$timeout < 0) |
|
208
|
0 |
39 |
if $Debug |
|
214
|
2 |
36 |
unless $$self{'LOCKING'} |
|
219
|
0 |
36 |
if $Debug |
|
226
|
0 |
0 |
if defined $$self{'TMPDIR'} |
|
229
|
0 |
0 |
if -d ($dir = $_) |
|
236
|
0 |
0 |
unless ref $_[0] |
|
247
|
0 |
57 |
unless defined $DBMFlags{$key} |
|
248
|
57 |
0 |
if (defined $DBMFlags{$key}{$mode}) |