| line |
true |
false |
branch |
|
51
|
3 |
82 |
unless defined $current |
|
55
|
0 |
82 |
unless (defined $value) |
|
61
|
0 |
82 |
if (defined $$hash{"${key}:$num"}) { } |
|
65
|
79 |
3 |
if (defined $newkey) { } |
|
76
|
0 |
0 |
unless defined $current |
|
78
|
0 |
0 |
unless defined $value |
|
84
|
0 |
0 |
if (s/:file$//) { } |
|
91
|
1 |
0 |
if defined $$self{'current'} |
|
101
|
1 |
1 |
unless (defined $value) |
|
104
|
0 |
1 |
unless (defined $start) |
|
112
|
0 |
1 |
unless (defined $start) |
|
115
|
1 |
0 |
if ($start gt $eq) |
|
124
|
1 |
0 |
unless (defined $recno) |
|
136
|
0 |
0 |
if (defined $value) { } |
|
140
|
0 |
0 |
if defined $start |
|
153
|
1 |
0 |
if defined $$dbf{'sdbm_definition'} and defined $$dbf{'sdbm_definition'}{'tags'}{$tag} |
|
165
|
0 |
0 |
if (defined $$dbf{'sdbm_definition'}) { } |
|
170
|
0 |
0 |
unless (tie %$definitionhash, 'SDBM_File', $file, 2, 438) |
|
180
|
0 |
0 |
unless (defined $sdbmfile) |
|
187
|
0 |
0 |
unless (tie %$sdbmhash, 'SDBM_File', $sdbmfile, 2, 438) |
|
207
|
0 |
1 |
if (defined $$dbf{'sdbm_definition'}) { } |
|
216
|
0 |
1 |
unless (tie %$definitionhash, 'SDBM_File', $file, 66, 438) |
|
224
|
0 |
1 |
if (defined $$definitionhash{"${tag}:file"}) |
|
234
|
0 |
1 |
unless (tie %$sdbmhash, 'SDBM_File', $sdbmfile, 194, 438) |
|
244
|
1 |
0 |
if (defined $dbf->field_type(uc $expression)) |
|
247
|
0 |
1 |
unless (defined $dbf->field_type($expression)) |
|
256
|
42 |
0 |
unless ($deleted) |
|
286
|
0 |
42 |
if $key_maxid > 1 |
|
297
|
10 |
32 |
if (not defined $next) { } |
|
303
|
2 |
40 |
if (not defined $prev) { } |
|
320
|
0 |
0 |
if ($$hash{"${key}:$number"} == $value) |
|
325
|
0 |
0 |
if ($number > $key_maxid) |
|
330
|
0 |
0 |
if ($key_maxid > 1) { } |
|
331
|
0 |
0 |
if $number != $key_maxid |
|
338
|
0 |
0 |
if (defined $next) { } |
|
339
|
0 |
0 |
if (not defined $prev) { } |
|
349
|
0 |
0 |
if (not defined $prev) { } |
|
366
|
0 |
0 |
if (defined $value) |