| line |
true |
false |
branch |
|
30
|
0 |
13403 |
if $symbol eq '=' |
|
34
|
0 |
13400 |
if ($overload::ops{'conversion'} =~ /$sym_regexp/) { } |
|
|
13400 |
0 |
elsif ($ovl_infix =~ /$sym_regexp/) { } |
|
|
0 |
0 |
elsif ($ovl_prefix =~ /$sym_regexp/) { } |
|
|
0 |
0 |
elsif ($symbol eq 'neg') { } |
|
|
0 |
0 |
elsif ($symbol eq 'atan2') { } |
|
|
0 |
0 |
elsif ($symbol eq '<>') { } |
|
39
|
13395 |
5 |
$reversed ? : |
|
62
|
0 |
13400 |
if $@ |
|
67
|
338832 |
0 |
if caller eq 'JE::LValue' |
|
74
|
144937 |
7453 |
if (defined blessed($obj) and $obj->can('id')) |
|
76
|
2 |
144935 |
if $id eq 'null' or $id eq 'undef' |
|
87
|
17 |
142115 |
unless defined blessed($base) |
|
92
|
142053 |
62 |
defined $val ? : |
|
99
|
553 |
15096 |
unless defined blessed($obj) |
|
106
|
0 |
22131 |
unless defined $prop |
|
110
|
2 |
22129 |
unless $prop->can('apply') |
|
119
|
362 |
7 |
defined blessed($base) ? : |
|
129
|
0 |
29241 |
if $method eq 'DESTROY' |
|
145
|
0 |
0 |
if not ref $_[0] or $_[1] eq 'DESTROY' |
|
147
|
0 |
0 |
unless (&UNIVERSAL::can) |
|
148
|
0 |
0 |
unless my $sub = (my $obj = (shift())->get)->can(@_) |