line |
true |
false |
branch |
20
|
1 |
37 |
unless @_ |
23
|
30 |
7 |
unless defined $value |
25
|
15 |
22 |
if blessed $value |
29
|
5 |
0 |
!($flags & 16384) ? : |
|
5 |
17 |
if my $is_number = $flags & 12288 |
32
|
3 |
19 |
if ($type and $type eq 'array' or ref $value eq 'ARRAY') { } |
|
3 |
16 |
elsif ($type and $type eq 'struct' or ref $value eq 'HASH') { } |
|
3 |
13 |
elsif ($type and $type eq 'int' or $is_number and $value =~ /^(?:\+|-)?\d+$/) { } |
|
2 |
11 |
elsif ($type and $type eq 'double' or $is_number and $value =~ /^(?:\+|-)?\d+\.\d+$/) { } |
|
3 |
8 |
elsif ($type and $type eq 'boolean' or ref $value eq 'SCALAR') { } |
|
2 |
6 |
elsif ($type and $type eq 'datetime' or $value =~ /^(\d\d\d\d)(\d\d)(\d\d)T(\d\d):(\d\d):(\d\d)$/) { } |