| line |
true |
false |
branch |
|
17
|
0 |
18 |
unless ref $attrs and ref $attrs eq 'HASH'
|
|
22
|
0 |
18 |
unless ref $force_type and ref $force_type eq 'HASH'
|
|
32
|
0 |
9 |
unless ref $attrs and ref $attrs eq 'HASH'
|
|
47
|
9 |
59 |
if (my $type = $force_type->{$key}) { }
|
|
52
|
60 |
5 |
if ($new_val)
|
|
68
|
45 |
28 |
if $type =~ /^(N|S)$/
|
|
69
|
6 |
22 |
if $type eq 'NULL'
|
|
70
|
2 |
2 |
$val ? :
|
|
|
4 |
18 |
if $type eq 'BOOL'
|
|
71
|
4 |
14 |
if $type =~ /^(NS|SS)$/
|
|
72
|
9 |
5 |
if $type eq 'L'
|
|
73
|
5 |
0 |
if $type eq 'M'
|
|
81
|
4 |
5 |
if ($type eq 'N')
|
|
82
|
3 |
1 |
unless &StrictNum()->check($val)
|
|
86
|
4 |
1 |
if ($type eq 'S')
|
|
87
|
2 |
2 |
unless defined $val and length $val
|
|
98
|
2 |
45 |
if $type eq 'NULL'
|
|
99
|
25 |
20 |
if $type =~ /^(S|N)$/
|
|
100
|
2 |
18 |
if $type eq 'BOOL' and $val
|
|
101
|
2 |
16 |
if $type eq 'BOOL'
|
|
102
|
4 |
12 |
if $type =~ /^(NS|SS)$/
|
|
103
|
7 |
5 |
if $type eq 'L'
|
|
104
|
5 |
0 |
if $type eq 'M'
|
|
112
|
4 |
84 |
unless defined $val
|
|
113
|
2 |
82 |
if $val eq ''
|
|
114
|
28 |
54 |
if _is_number($val)
|
|
115
|
29 |
25 |
unless ref $val
|
|
117
|
4 |
21 |
if &isBoolean($val)
|
|
120
|
9 |
12 |
if $ref eq 'ARRAY'
|
|
121
|
6 |
6 |
if $ref eq 'HASH'
|
|
123
|
5 |
1 |
if (&blessed($val) and $val->isa('Set::Object'))
|
|
127
|
2 |
2 |
if (grep {/^S$/;} @types) { }
|