line |
true |
false |
branch |
42
|
0 |
24 |
unless ref $field_ids eq 'ARRAY'
|
46
|
0 |
120 |
unless my $module = $MODULES{$trans_id} or $self->_error('invalid module')
|
51
|
0 |
120 |
unless $pkg->moduleload('session', $$self{'session'}, 'instance', $instance, 'field_id', $field_ids)
|
75
|
0 |
68 |
unless $$self{'trans_id'}
|
76
|
0 |
68 |
unless $$self{'field_id'}
|
78
|
0 |
68 |
unless my $module = $MODULES{$$self{'trans_id'}}
|
83
|
0 |
68 |
unless $self->init
|
96
|
0 |
2 |
unless my $field = 'DBR::Config::Field'->new('session', $$self{'session'}, 'field_id', $$self{'field_id'})
|
110
|
2 |
2 |
unless scalar @tv > 0
|
111
|
0 |
2 |
if scalar @tv > 1
|
114
|
0 |
2 |
unless my $testsub = $field->testsub
|
117
|
0 |
0 |
defined $value ? :
|
|
0 |
2 |
unless &$testsub($value)
|