line |
true |
false |
branch |
96
|
1 |
0 |
unless (defined $_) |
100
|
0 |
0 |
if (/^:all$/) |
104
|
0 |
0 |
if (/^:other$/) |
108
|
0 |
0 |
if (/^:bdb/) |
112
|
0 |
0 |
if (/^:db$/) |
116
|
0 |
0 |
if (/^:R$/) |
120
|
0 |
0 |
if (/^:O$/) |
128
|
0 |
0 |
unless ($flags) |
133
|
0 |
0 |
if (not @AnyDBM_File::ISA) { } |
|
0 |
0 |
elsif (@AnyDBM_File::ISA > 1) { } |
145
|
0 |
0 |
if grep /^$qm$/, @IGNORED_SYMBOLS |
146
|
0 |
0 |
if (/^\$(.*)/) |
149
|
0 |
0 |
if $@ |
150
|
0 |
0 |
if ($flags & 4 and $1 =~ /^DB_/ or $flags & 8 and not $1 =~ /^DB_/) |
156
|
0 |
0 |
if (/^\@(.*)/) |
159
|
0 |
0 |
if $@ |
160
|
0 |
0 |
if ($flags & 8) |
165
|
0 |
0 |
if (/^\%(.*)/) |
168
|
0 |
0 |
if $@ |
169
|
0 |
0 |
if ($flags & 8) |
174
|
0 |
0 |
if (/^[^\$\@%]/) |
175
|
0 |
0 |
if $flags & 1 and /^R_/ or $flags & 2 and /^O_/ or $flags & 8 and /^[RO]_/ |