| line |
true |
false |
branch |
|
56
|
0 |
0 |
if ($args{-'class'}) { } |
|
59
|
0 |
0 |
if ($@) |
|
61
|
0 |
0 |
unless ($class->can('new')) |
|
97
|
29 |
0 |
unless ($class =~ /:/) |
|
101
|
0 |
29 |
if ($class eq ':all') |
|
110
|
1 |
28 |
if ($vglob and *$vglob{'SCALAR'}) |
|
117
|
15 |
13 |
if $@ |
|
131
|
0 |
0 |
if ($r) |
|
132
|
0 |
0 |
if $self->OnlineUserDB |
|
145
|
0 |
0 |
if $self->OnlineUserDB |
|
159
|
0 |
0 |
if ($r) |
|
178
|
0 |
0 |
unless $user |
|
216
|
0 |
0 |
if (defined $$self{$db} and $$self{$db}->can('init')) |
|
232
|
0 |
0 |
if (exists $$self{$db} and $$self{$db}->can('delete_db_contents')) |
|
248
|
0 |
0 |
if (exists $$self{$db} and $$self{$db}->can('delete_db')) |
|
262
|
0 |
0 |
if (@_) |
|
264
|
0 |
0 |
if ($self->UserDB) |
|
273
|
0 |
0 |
if (@_) { } |
|
276
|
0 |
0 |
if ($self->CurrentUser and 0) { } |