| blib/lib/MVC/Neaf/Exception.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 18 | 94.4 |
| line | true | false | branch |
|---|---|---|---|
| 74 | 6 | 50 | if (@_ % 2) |
| 81 | 0 | 56 | unless ($opt{'-status'} || '') =~ qr/^(?:(\d\d\d)\s*)?(.*?)(?:\s+at (\S+) line (\d+)\.?)?$/s |
| 88 | 39 | 17 | $opt{'-nocaller'} ? : |
| 116 | 21 | 71 | $self->{'-sudden'} ? : |
| 134 | 5 | 4 | $self->{'-sudden'} ? : |
| 2 | 7 | $self->{'-location'} ? : | |
| 158 | 36 | 7 | unless $self->{'-headers'} |
| 159 | 3 | 40 | if (my $where = $self->{'-location'}) |
| 211 | 22 | 1 | $self->{'-file'} && $self->{'-line'} ? : |