blib/lib/Try/Harder.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 22 | 68.1 |
line | true | false | branch |
---|---|---|---|
19 | 0 | 9 | if (can_load('modules', {'Syntax::Keyword::Try', undef}) and not $ENV{'TRY_HARDER_USE_PP'}) { } |
116 | 54 | 0 | if $code_block |
124 | 26 | 28 | if ($kw eq 'try') { } |
20 | 8 | elsif ($kw eq 'catch') { } | |
8 | 0 | elsif ($kw eq 'finally') { } | |
132 | 0 | 20 | if $found_catch++ |
136 | 0 | 8 | if $found_finally++ |
142 | 26 | 28 | unless ($remainder =~ /\A \s* ( catch | finally ) \s* [{] /msx) |
194 | 0 | 9 | "$]" < 5.013002 ? : |
211 | 1 | 7 | unless (eval { do { $@ = $err; &$code(@args); 1 } }) |
212 | 1 | 0 | defined $@ ? : |