line |
true |
false |
branch |
52
|
0 |
59 |
unless (defined $x) |
54
|
1 |
58 |
if (&Switch::case('Hessian::Type::Null')) |
55
|
1 |
57 |
if (&Switch::case('Hessian::Type::True')) |
56
|
1 |
56 |
if (&Switch::case('Hessian::Type::False')) |
57
|
3 |
53 |
if (&Switch::case('Hessian::Type::Date')) |
58
|
3 |
0 |
'Math::BigInt' eq ref $$x{'data'} ? : |
63
|
0 |
53 |
if (&Switch::case('DateTime')) |
65
|
16 |
37 |
if (&Switch::case('Hessian::Type::Integer')) |
66
|
0 |
37 |
if (&Switch::case('Hessian::Type::Long')) |
67
|
18 |
19 |
if (&Switch::case('Math::BigInt')) |
68
|
13 |
6 |
if (&Switch::case('Hessian::Type::Double')) |
70
|
0 |
6 |
if (&Switch::case('Hessian::Type::Binary')) |
71
|
6 |
0 |
if (&Switch::case('Hessian::Type::String')) |
72
|
0 |
0 |
if (&Switch::case('Unicode::String')) |
73
|
0 |
0 |
if (&Switch::case('Hessian::Type::XML')) |
75
|
0 |
0 |
if (&Switch::case('Hessian::Type::List')) |
76
|
0 |
0 |
if (defined $idx) { } |
83
|
0 |
0 |
if (&Switch::case('ARRAY')) |
84
|
0 |
0 |
if (defined $idx) { } |
92
|
0 |
0 |
if (&Switch::case('Hessian::Type::Map')) |
93
|
0 |
0 |
if (defined $idx) { } |
100
|
0 |
0 |
if (&Switch::case('Hessian::Type::Fault')) |
102
|
0 |
0 |
if (&Switch::case('HASH')) |
103
|
0 |
0 |
if (defined $idx) { } |
113
|
0 |
0 |
if (&Switch::case('REF')) |
115
|
0 |
0 |
if (&Switch::case('')) |
117
|
0 |
0 |
if (&Switch::case(qr/^[\+\-]?(0x)?\d+$/)) |
118
|
0 |
0 |
if ('Math::BigInt'->new('-0x80000000')->bcmp($bi) <= 0 and 'Math::BigInt'->new(' 0x7fffffff')->bcmp($bi) >= 0) { } |
|
0 |
0 |
elsif ('Math::BigInt'->new('-0x8000000000000000')->bcmp($bi) <= 0 and 'Math::BigInt'->new(' 0x7fffffffffffffff')->bcmp($bi) >= 0) { } |
130
|
0 |
0 |
if (&Switch::case(qr/^[\+\-]?\d*(\d+\.|\.\d+)\d*$/)) |
131
|
0 |
0 |
if (&Switch::case(qr/\D/)) |
142
|
0 |
0 |
if $$refs[$i] == $r |
148
|
0 |
0 |
if (length $str > 32767) { } |
161
|
0 |
6 |
if (length $str > 32767) { } |
162
|
0 |
0 |
$utf8 ? : |
167
|
6 |
0 |
$utf8 ? : |
176
|
0 |
0 |
if ($$x{'type'}) |
180
|
0 |
0 |
if $$x{'length'} |
189
|
0 |
0 |
if ($$x{'type'}) |
193
|
0 |
0 |
'HASH' eq ref $$x{'data'} ? : |
205
|
183 |
4 |
unless defined $h_flg_override |
209
|
3 |
2 |
$h_flg_override ? : |
|
5 |
182 |
if (&Switch::case('N')) |
210
|
60 |
1 |
$h_flg_override ? : |
|
61 |
121 |
if (&Switch::case('T')) |
211
|
1 |
1 |
$h_flg_override ? : |
|
2 |
119 |
if (&Switch::case('F')) |
213
|
32 |
87 |
if (&Switch::case('I')) |
214
|
16 |
16 |
$h_flg_override ? : |
219
|
36 |
51 |
if (&Switch::case('L')) |
220
|
18 |
18 |
$h_flg_override ? : |
225
|
26 |
25 |
if (&Switch::case('D')) |
226
|
13 |
13 |
$h_flg_override ? : |
231
|
6 |
19 |
if (&Switch::case('d')) |
232
|
3 |
3 |
$h_flg_override ? : |
237
|
18 |
1 |
if (&Switch::case(qr/([BbSsXx])/)) |
241
|
10 |
6 |
unless $h_flg_override |
243
|
0 |
6 |
if (&Switch::case(qr/[Bb]/)) |
244
|
6 |
0 |
if (&Switch::case(qr/[Ss]/)) |
245
|
0 |
0 |
if (&Switch::case(qr/[Xx]/)) |
248
|
0 |
1 |
if (&Switch::case('V')) |
249
|
0 |
0 |
$h_flg_override ? : |
254
|
0 |
1 |
if (&Switch::case('M')) |
256
|
0 |
0 |
$h_flg_override ? : |
261
|
0 |
1 |
if (&Switch::case('R')) |
262
|
0 |
1 |
if (&Switch::case('H')) |
267
|
0 |
1 |
if (&Switch::case('r')) |
272
|
1 |
0 |
if (&Switch::case('f')) |
277
|
0 |
0 |
if (&Switch::case('z')) |
287
|
2 |
16 |
if ($marker =~ /[bsx]/) { } |
295
|
0 |
0 |
if ('t' eq &$rd(1)) { } |
300
|
0 |
0 |
if ('l' eq &$rd(1)) { } |
312
|
0 |
1 |
if ('t' eq &$rd(1)) { } |