| blib/lib/Sub/Block.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 15 | 73.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 41 | 8 | 12 | 0 | @_ == 1 and ref $_[0] eq 'HASH' |
| 8 | 0 | 12 | @_ == 1 and ref $_[0] eq 'CODE' | |
| 75 | 1 | 1 | 126 | $name ne 'return' and $name ne 'wantarray' |
| 121 | 4 | 0 | 2 | exists $$vars{$k} and &refaddr($$vars{$k}) == &refaddr($$sub_closures{$k}) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 49 | 11 | 1 | 0 | $deparse ||= 'B::Deparse'->new |