line |
true |
false |
branch |
66
|
10 |
3 |
if (not exists $registry{$name}) |
97
|
6 |
11 |
unless $args{'registry'} |
98
|
0 |
17 |
unless $args{'dbtype'} |
99
|
0 |
17 |
unless $args{'apptype'} |
100
|
6 |
11 |
unless defined $args{'registry'} |
103
|
2 |
15 |
unless exists $registry{$args{'registry'}} |
106
|
3 |
12 |
if exists $registry{$args{'registry'}}{$args{'dbtype'}} and $registry{$args{'registry'}}{$args{'dbtype'}} ne $args{'apptype'} |
113
|
0 |
12 |
if $parent |
115
|
2 |
10 |
unless exists ${"::$parent";}{"${final}::"} |
117
|
0 |
10 |
unless $args{'apptype'}->can('from_db') |
134
|
0 |
3 |
unless $args{'registry'} |
135
|
0 |
3 |
unless $args{'dbtype'} |
137
|
1 |
2 |
unless exists $registry{$args{'registry'}} |
139
|
1 |
1 |
unless $registry{$args{'registry'}}{$args{'dbtype'}} |
160
|
0 |
2 |
unless exists $args{'dbstring'} |
185
|
0 |
4 |
unless exists $args{'registry'} |
186
|
0 |
4 |
unless $args{'dbtype'} |
189
|
0 |
4 |
if ($args{'dbtype'} =~ /^_/) |
195
|
0 |
2 |
$args{'_unmapped_undef'} ? : |
|
2 |
2 |
unless $registry{$args{'registry'}}{$args{'dbtype'}} |
197
|
0 |
2 |
if ($arraytype) |
232
|
0 |
0 |
unless exists $args{'registry'} |
233
|
0 |
0 |
unless exists $args{'types'} |
238
|
0 |
0 |
if (&reftype($types) eq 'ARRAY') |
239
|
0 |
0 |
unless exists $args{'columns'} |
249
|
0 |
0 |
unless (defined $column_deserializers{$_}) |
277
|
0 |
3 |
unless $name |
278
|
0 |
3 |
unless exists $registry{$name} |