inc/Test/Exception.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 20 | 25.0 |
line | true | false | branch |
---|---|---|---|
19 | 0 | 3 | if (@_) |
87 | 27 | 0 | unless ref $exception |
93 | 0 | 5 | unless defined $exception |
94 | 0 | 5 | unless _is_exception($exception) |
96 | 0 | 5 | if $class and not "$exception" =~ /^\Q$class\E/ |
227 | 0 | 0 | $regex ? : |
230 | 0 | 0 | unless ($ok) |
276 | 0 | 0 | unless defined $_[2] |
280 | 0 | 0 | if eval { do { &$test() } } |
283 | 0 | 0 | if (_is_exception($exception)) |