| line |
true |
false |
branch |
|
58
|
15 |
0 |
if $@ |
|
61
|
0 |
0 |
unless $db_name |
|
64
|
0 |
0 |
unless UNIVERSAL::can($self, "db_$db_name") |
|
81
|
0 |
0 |
if $@ |
|
119
|
0 |
0 |
if @_ |
|
131
|
0 |
0 |
if @_ |
|
148
|
0 |
0 |
if $@ |
|
151
|
0 |
0 |
unless (UNIVERSAL::can($utilClass, 'new')) |
|
155
|
0 |
0 |
if $@ |
|
172
|
0 |
0 |
unless defined $schema |
|
174
|
0 |
0 |
if $DEBUG |
|
194
|
0 |
0 |
if $DEBUG |
|
196
|
0 |
0 |
if $@ |
|
206
|
0 |
0 |
if ($class->is_abstract) |
|
207
|
0 |
0 |
if $DEBUG |
|
213
|
0 |
0 |
if $DEBUG |
|
220
|
0 |
0 |
if $@ |
|
221
|
0 |
0 |
if ($assoc->type ne 'Reference') { } |
|
|
0 |
0 |
elsif (not $assoc->is_weak) { } |
|
229
|
0 |
0 |
if (lc $assoc->type eq 'array') { } |
|
|
0 |
0 |
elsif (lc $assoc->type eq 'hash') { } |
|
246
|
0 |
0 |
if (@{$class->parents;}) |
|
252
|
0 |
0 |
if $DEBUG |