line |
true |
false |
branch |
79
|
0 |
29 |
unless defined $class |
81
|
3 |
26 |
if ($HONOR_STRINGIFY and overload::Method($obj, '""')) { } |
87
|
0 |
26 |
_is_Regexp($obj) ? : |
91
|
26 |
0 |
exists $COPY_DISPATCH{$type} ? : |
102
|
0 |
6 |
unless $cv->isa('B::CV') |
105
|
0 |
6 |
if $cv->GV->isa('B::SPECIAL') |
121
|
0 |
26 |
unless $sv->isa('B::PVMG') |
122
|
26 |
0 |
unless my $m = $sv->MAGIC |
136
|
21 |
88 |
unless $type |
139
|
30 |
58 |
if ($blessed) |
140
|
1 |
29 |
$blessed eq 'Regexp' ? : |
144
|
0 |
88 |
unless defined $slobd |
191
|
0 |
13 |
unless ref $processed_object |
192
|
0 |
13 |
unless reftype $processed_object eq 'HASH' |
196
|
0 |
13 |
unless defined $type |
201
|
13 |
0 |
if exists $RECURSE_DISPATCH{$type} |
222
|
21 |
67 |
if blessed $item |
223
|
20 |
68 |
unless defined $type |
230
|
22 |
66 |
unless defined $repl_type |
232
|
59 |
7 |
if (exists $RECURSE_DISPATCH{$type}) |
234
|
0 |
59 |
unless defined $id |
236
|
18 |
41 |
if exists $SEEN{$id} |