line |
true |
false |
branch |
94
|
1 |
22 |
if ($self->_has_insert) |
234
|
0 |
19 |
if @$class != @$name |
244
|
8 |
11 |
unless (defined $retval) |
246
|
2 |
6 |
if XXX |
250
|
2 |
4 |
if $opt{'on_failure'} eq 'throw' |
255
|
7 |
4 |
$opt{'return_value'} eq 'value' ? : |
267
|
51 |
169 |
if ($idx + 1 == @$name) |
269
|
11 |
0 |
if (exists $db->{$component} and exists $db->{$component}{'!!VALUE'}) |
279
|
2 |
9 |
$return_all ? : |
292
|
56 |
260 |
if (my $subdb = $db->{$component}) |
295
|
32 |
24 |
if defined $res |
301
|
25 |
112 |
if (my $subdb = $db->{'?'}) |
304
|
0 |
25 |
if defined $res |
308
|
36 |
101 |
if (my $subdb = $db->{'*'}) |
313
|
12 |
108 |
if defined $res |
355
|
0 |
750 |
unless defined $var and defined $value |
400
|
1500 |
0 |
if ($key =~ /^(?.*)[.](?$Config::XrmDatabase::META_QR)$/u) |
401
|
750 |
750 |
unless $+{'component'} eq '!!VALUE' |
529
|
0 |
8 |
unless $iopt{$_} =~ /$match->{$_}/u |
544
|
3 |
1 |
if (my $component = $Config::XrmDatabase::RMETA{$opt{'value'}}) { } |
|
1 |
0 |
elsif ($opt{'value'} eq 'all') { } |
547
|
30 |
0 |
if ($key =~ /^(?.*)[.](?$Config::XrmDatabase::META_QR)$/u) |
551
|
15 |
15 |
if $+{'component'} eq $component |
559
|
10 |
0 |
if ($key =~ /^(?.*)[.](?$Config::XrmDatabase::META_QR)$/u) |
572
|
3 |
1 |
if $opt{'key'} eq 'string' |
575
|
1 |
0 |
if $opt{'key'} eq 'array' |
709
|
1 |
4 |
unless $normalize_names |