| line |
true |
false |
branch |
|
29
|
150 |
2770 |
if (defined $field)
|
|
30
|
0 |
150 |
unless ref $field eq 'DBR::Config::Field'
|
|
33
|
0 |
2920 |
unless exists $params{'value'}
|
|
36
|
15 |
2905 |
if (ref $value eq 'DBR::Util::Operator')
|
|
43
|
897 |
2023 |
unless ref $value eq 'ARRAY'
|
|
45
|
150 |
2770 |
if (ref $field eq 'DBR::Config::Field') { }
|
|
48
|
37 |
113 |
if ($trans)
|
|
55
|
0 |
0 |
defined $_ ? :
|
|
|
0 |
37 |
unless scalar @tv
|
|
62
|
0 |
150 |
unless my $testsub = $field->testsub
|
|
65
|
1 |
1 |
defined $_ ? :
|
|
|
2 |
159 |
unless &$testsub($_)
|
|
69
|
0 |
2770 |
unless defined $params{'is_number'}
|
|
71
|
2011 |
759 |
$params{'is_number'} ? :
|
|
73
|
2011 |
759 |
if ($$self{'is_number'})
|
|
75
|
0 |
2231 |
unless defined $val
|
|
76
|
0 |
2231 |
unless looks_like_number $val
|
|
97
|
0 |
2917 |
unless my $conn = shift()
|
|
103
|
85 |
2832 |
if (@$values != 1) { }
|
|
|
2832 |
0 |
elsif (@$values == 1) { }
|
|
116
|
25 |
720 |
if $self->count == 1 and not defined $$self{'value'}[0]
|
|
124
|
0 |
2917 |
unless my $conn = shift()
|
|
126
|
2132 |
785 |
if ($self->is_number) { }
|
|
127
|
2362 |
1 |
defined $_ ? :
|
|
129
|
785 |
0 |
defined $_ ? :
|
|
134
|
0 |
12 |
wantarray ? :
|