| blib/lib/Devel/PrettyTrace.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 18 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 44 | 1 | 18 | if &$filter($info[3]) |
| 49 | 6 | 0 | if (defined wantarray) { } |
| 62 | 1 | 18 | if any sub { $test_pkg =~ /$_/; } , @filters |
| 72 | 1 | 17 | if (defined $$info[6]) { } |
| 1 | 16 | elsif ($$info[3] eq '(eval)') { } | |
| 73 | 0 | 1 | if ($$info[7]) { } |
| 88 | 16 | 2 | if ($$info[4]) |
| 91 | 5 | 11 | if (scalar @DB::args) |
| 117 | 0 | 1 | if ($len > 2 and length $str > $len) |