| 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}) |