| line |
true |
false |
branch |
|
25
|
0 |
181 |
if $class ne "Data::CompactReadonly::V0::Node" |
|
41
|
0 |
65800 |
if (bool_supported() and is_bool($args{'data'})) { } |
|
|
65793 |
7 |
elsif (defined $args{'data'}) { } |
|
44
|
0 |
0 |
$args{'data'} ? : |
|
48
|
40 |
65753 |
ref $args{'data'} ? : |
|
60
|
0 |
131339 |
if (bool_supported() and is_bool($args{'data'})) { } |
|
|
131333 |
6 |
elsif (defined $args{'data'}) { } |
|
64
|
0 |
0 |
$args{'data'} ? : |
|
69
|
31 |
131302 |
ref $args{'data'} ? : |
|
116
|
8 |
0 |
$int <= 18446744073709551615 ? : |
|
|
10 |
8 |
$int <= 4294967295 ? : |
|
|
13 |
18 |
$int <= 16777215 ? : |
|
|
18 |
31 |
$int <= 65535 ? : |
|
|
65735 |
49 |
$int <= 255 ? : |
|
130
|
1 |
0 |
$bytes == 4 ? : |
|
|
4 |
1 |
$bytes == 3 ? : |
|
|
8 |
5 |
$bytes == 2 ? : |
|
|
65707 |
13 |
$bytes == 1 ? : |
|
141
|
0 |
65680 |
unless $class->_sub_type_for_collection_of_length(length "Data::CompactReadonly::V0::Text"->_text_to_bytes($data)) |
|
155
|
0 |
21 |
unless $class->_sub_type_for_collection_of_length(1 + $#{$data;}) |
|
159
|
0 |
19 |
unless $class->_sub_type_for_collection_of_length(scalar keys %{$data;}) |
|
163
|
0 |
0 |
$data ? : |
|
|
61 |
0 |
!ref($data) ? : |
|
|
15 |
61 |
is_number($data) ? : |
|
|
58 |
76 |
is_integer($data) ? : |
|
|
19 |
134 |
ref $data eq 'HASH' ? : |
|
|
21 |
153 |
ref $data eq 'ARRAY' ? : |
|
|
0 |
174 |
bool_supported() && is_bool($data) ? : |
|
|
7 |
174 |
!defined($data) ? : |
|
164
|
5 |
53 |
$data < 0 ? : |
|
166
|
8 |
0 |
$bytes < 9 ? : |
|
|
8 |
8 |
$bytes == 4 ? : |
|
|
8 |
16 |
$bytes == 3 ? : |
|
|
8 |
24 |
$bytes == 2 ? : |
|
|
26 |
32 |
$bytes == 1 ? : |
|
221
|
4 |
818 |
if $scalar_type eq "Reserved" |
|
223
|
9 |
809 |
if $type ne "Scalar" and $scalar_type =~ /^(Null|Float64|Negative|Huge|True|False)/ |
|
234
|
64 |
926 |
unless ($type_name->VERSION) |
|
236
|
0 |
64 |
if $@ |
|
249
|
0 |
3161 |
if (not defined $chars_read) { } |
|
|
1 |
3160 |
elsif ($chars_read != $bytes) { } |
|
270
|
1769 |
197084 |
if ($#_ == 0) { } |
|
278
|
4 |
197080 |
if $args{'pointer'} >= 256 ** $args{'ptr_size'} |