| lib/Carp/Trace.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 18 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 28 | 0 | 11 | if $level and $level < $i |
| 31 | 2 | 9 | unless scalar @caller |
| 36 | 1 | 0 | defined $evaltext ? : |
| 1 | 8 | $subroutine eq '(eval)' ? : | |
| 44 | 0 | 9 | if $is_require |
| 45 | 2 | 4 | $wantarray ? : |
| 6 | 3 | defined $wantarray ? : | |
| 48 | 8 | 1 | $hasargs ? : |
| 51 | 4 | 5 | if ($args) |