| blib/lib/Test/Alien/Diag.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 10 | 90.0 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 4 | 12 | if (length $str > $max) |
| 42 | 4 | 8 | if (eval { do { $alien->can($name) } }) |
| 51 | 2 | 2 | if (eval { do { $alien->can($name) } }) |
| 55 | 0 | 2 | if $@ |
| 60 | 1 | 1 | unless $found |