| line |
true |
false |
branch |
|
41
|
54 |
2 |
unless _is_num($a) or _is_num($b) |
|
42
|
25 |
4 |
if _is_num($a) and _is_num($b) |
|
48
|
148 |
35 |
@_ == 3 ? : |
|
53
|
15 |
168 |
if blessed $t and not $self->is_registered($t_type) |
|
55
|
16 |
167 |
if blessed $m and not $self->is_registered($t_type, $m_type) |
|
77
|
0 |
192 |
unless $self->is_registered($t_type, $m_type) |
|
79
|
192 |
0 |
@_ == 5 ? : |
|
90
|
1 |
708 |
if $self->is_registered($t_type, $m_type) and warnings::enabled() |
|
95
|
1 |
708 |
if exists $comp{'reversible'} and $comp{'reversible'} |
|
100
|
0 |
89 |
defined $_[3] ? : |
|
101
|
0 |
89 |
defined $_[4] ? : |
|
103
|
0 |
89 |
if length $prefix == 0 |
|
112
|
0 |
705 |
unless $sub = *{$$tbl{$_};}{'CODE'} |
|
126
|
35 |
934 |
if @_ == 2 |
|
128
|
934 |
0 |
if @_ == 3 |