| line |
true |
false |
branch |
|
30
|
10 |
13462 |
if $symbol eq '=' |
|
34
|
5 |
13454 |
if ($overload::ops{'conversion'} =~ /$sym_regexp/) { } |
|
|
13440 |
14 |
elsif ($ovl_infix =~ /$sym_regexp/) { } |
|
|
11 |
3 |
elsif ($ovl_prefix =~ /$sym_regexp/) { } |
|
|
1 |
2 |
elsif ($symbol eq 'neg') { } |
|
|
1 |
1 |
elsif ($symbol eq 'atan2') { } |
|
|
1 |
0 |
elsif ($symbol eq '<>') { } |
|
39
|
13395 |
45 |
$reversed ? : |
|
62
|
0 |
13451 |
if $@ |
|
67
|
338993 |
1 |
if caller eq 'JE::LValue' |
|
74
|
144940 |
7457 |
if (defined blessed($obj) and $obj->can('id')) |
|
76
|
4 |
144936 |
if $id eq 'null' or $id eq 'undef' |
|
87
|
18 |
142187 |
unless defined blessed($base) |
|
92
|
142125 |
62 |
defined $val ? : |
|
99
|
554 |
15098 |
unless defined blessed($obj) |
|
106
|
0 |
22132 |
unless defined $prop |
|
110
|
2 |
22130 |
unless $prop->can('apply') |
|
119
|
364 |
9 |
defined blessed($base) ? : |
|
129
|
0 |
29242 |
if $method eq 'DESTROY' |
|
145
|
0 |
7 |
if not ref $_[0] or $_[1] eq 'DESTROY' |
|
147
|
4 |
3 |
unless (&UNIVERSAL::can) |
|
148
|
2 |
2 |
unless my $sub = (my $obj = (shift())->get)->can(@_) |