| blib/lib/Log/Report/Die.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 18 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 0 | 18 | unless @text |
| 31 | 11 | 7 | if ($text[0] =~ s/ at (.+) line (\d+)\.?$//) { } |
| 4 | 6 | elsif (@text > 1 and $text[1] =~ /^\s*at (.+) line (\d+)\.?$/) { } | |
| 41 | 12 | 6 | unless $text[0] =~ s/\s*[.:;]?\s*$err\s*$// |
| 44 | 0 | 18 | unless length $msg[0] |
| 48 | 15 | 0 | if (/^\s*(.*?)\s+called at (.*?) line (\d+)\s*$/) { } |
| 53 | 5 | 13 | @stack ? : |
| 58 | 3 | 9 | @stack ? : |
| 6 | 12 | $opt{'errno'} ? : |