| inc/UNIVERSAL/can.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 7 | 14 | 50.0 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 43 | 0 | 0 | 152963 | defined $caller and defined $_[0] | 
| 0 | 152957 | 6 | defined $caller and defined $_[0] and eval { do { local $UNIVERSAL::can::recursing = 1; $caller->isa($_[0]) } } | 
| line | l | !l | condition | 
|---|---|---|---|
| 66 | 225 | 0 | (caller 2)[3] || '' | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 43 | 143960 | 0 | 152963 | $UNIVERSAL::can::recursing or defined $caller and defined $_[0] and eval { do { local $UNIVERSAL::can::recursing = 1; $caller->isa($_[0]) } } | 
| 64 | 0 | 225 | 0 | $UNIVERSAL::can::always_warn or warnings::enabled() |