line |
true |
false |
branch |
140
|
13 |
272 |
if (my $terse_object = $refaddr_tersified_as{&refaddr($data_structure)}) |
145
|
64 |
208 |
unless (ref $data_structure) |
151
|
2 |
206 |
if (ref $data_structure eq 'REF') |
155
|
1 |
1 |
unless ($changed) |
163
|
14 |
192 |
if $seen_refaddr{&refaddr($data_structure)}++ |
166
|
67 |
125 |
if (&blessed($data_structure)) |
168
|
32 |
35 |
if ($changed) |
181
|
54 |
154 |
$this_value_changed ? : |
184
|
14 |
111 |
if (ref $data_structure eq 'ARRAY') { } |
|
110 |
1 |
elsif (ref $data_structure eq 'HASH') { } |
189
|
10 |
4 |
unless ($changed) |
198
|
71 |
39 |
unless ($changed) |
210
|
41 |
2 |
if (not $safe_to_mess_with_refaddr{&refaddr($data_structure)}) { } |
225
|
24 |
43 |
if (ref $data_structure eq 'Data::Tersify::Summary') |
236
|
19 |
24 |
unless ($changed) |
237
|
19 |
0 |
if (my $overload_info = Devel::OverloadInfo::overload_info($data_structure)) |
240
|
2 |
17 |
if ($overload_info->{'""'}) |
256
|
22 |
19 |
if ($changed and $caller_sub ne 'Data::Tersify::tersify') |
263
|
14 |
5 |
if (&reftype($data_structure) eq 'HASH') { } |
|
2 |
3 |
elsif (&reftype($data_structure) eq 'ARRAY') { } |
268
|
16 |
3 |
if ($object_contents) |
271
|
8 |
8 |
if ($changed) |
273
|
5 |
3 |
if (not $safe_to_mess_with_refaddr{&refaddr($data_structure)}) { } |
305
|
3 |
2 |
if (&reftype($safe_structure) eq 'HASH' and &reftype($new_contents) eq 'HASH') { } |
|
2 |
0 |
elsif (&reftype($safe_structure) eq 'ARRAY' and &reftype($new_contents) eq 'ARRAY') { } |
352
|
1 |
42 |
unless (keys %handled_by_plugin) |
363
|
24 |
19 |
if (my $plugin = $handled_by_plugin{ref $object}) |