| blib/lib/Try/Harder.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 22 | 68.1 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 0 | 10 | if (can_load('modules', {'Syntax::Keyword::Try', undef}) and not $ENV{'TRY_HARDER_USE_PP'}) { } |
| 115 | 58 | 0 | if $code_block |
| 123 | 28 | 30 | if ($kw eq 'try') { } |
| 22 | 8 | elsif ($kw eq 'catch') { } | |
| 8 | 0 | elsif ($kw eq 'finally') { } | |
| 131 | 0 | 22 | if $found_catch++ |
| 135 | 0 | 8 | if $found_finally++ |
| 141 | 28 | 30 | unless ($remainder =~ /\A \s* ( catch | finally ) \s* [{] /msx) |
| 193 | 0 | 10 | "$]" < 5.013002 ? : |
| 210 | 1 | 7 | unless (eval { do { $@ = $err; &$code(@args); 1 } }) |
| 211 | 1 | 0 | defined $@ ? : |