line |
true |
false |
branch |
17
|
0 |
25 |
unless ref $attrs and ref $attrs eq 'HASH'
|
22
|
0 |
25 |
unless ref $force_type and ref $force_type eq 'HASH'
|
39
|
0 |
9 |
unless ref $attrs and ref $attrs eq 'HASH'
|
55
|
98 |
7 |
if ($new_val)
|
81
|
39 |
101 |
if ($type eq 'S')
|
83
|
3 |
36 |
if ($force_type eq 'N')
|
90
|
40 |
61 |
if ($type eq 'N')
|
92
|
9 |
31 |
if ($force_type eq 'S')
|
99
|
14 |
47 |
if ($type eq 'NULL')
|
101
|
7 |
7 |
if ($force_type)
|
108
|
12 |
35 |
if ($type eq 'BOOL')
|
110
|
2 |
10 |
if ($force_type eq 'S')
|
111
|
1 |
1 |
$val ? :
|
114
|
2 |
8 |
if ($force_type eq 'N')
|
115
|
1 |
1 |
$val ? :
|
117
|
4 |
4 |
$val ? :
|
121
|
11 |
24 |
if ($type =~ /^(NS|SS)$/)
|
123
|
2 |
9 |
if $force_type
|
129
|
12 |
12 |
if ($type eq 'L')
|
137
|
12 |
0 |
if ($type eq 'M')
|
139
|
7 |
5 |
if ($force_type)
|
153
|
2 |
45 |
if $type eq 'NULL'
|
154
|
25 |
20 |
if $type =~ /^(S|N)$/
|
155
|
2 |
18 |
if $type eq 'BOOL' and $val
|
156
|
2 |
16 |
if $type eq 'BOOL'
|
157
|
4 |
12 |
if $type =~ /^(NS|SS)$/
|
158
|
7 |
5 |
if $type eq 'L'
|
159
|
5 |
0 |
if $type eq 'M'
|
167
|
10 |
166 |
unless defined $val
|
168
|
4 |
162 |
if $val eq ''
|
169
|
56 |
106 |
if _is_valid_number($val)
|
170
|
56 |
50 |
unless ref $val
|
172
|
12 |
38 |
if &isBoolean($val)
|
175
|
12 |
26 |
if $ref eq 'ARRAY'
|
176
|
13 |
13 |
if $ref eq 'HASH'
|
178
|
12 |
1 |
if (&blessed($val) and $val->isa('Set::Object'))
|
182
|
6 |
5 |
if (grep {/^S$/;} @types) { }
|
194
|
50 |
112 |
if ref $val
|
195
|
49 |
63 |
unless &StrictNum()->check($val)
|
198
|
0 |
63 |
if "$val" eq '0'
|
199
|
1 |
62 |
if $val == 0
|
201
|
1 |
61 |
if $val > 0 and $val <= 1e-130
|
202
|
1 |
60 |
if $val < 0 and $val >= -1e-130
|
204
|
1 |
59 |
if $val >= 1e+126
|
205
|
1 |
58 |
if $val <= -1e+126
|
207
|
2 |
56 |
if length $val > 38
|