blib/lib/Aspect/Advice/Around.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 20 | 24 | 83.3 |
line | true | false | branch |
---|---|---|---|
28 | 9 | 35 | $curried ? : |
29 | 9 | 35 | $compiled ? : |
42 | 28 | 16 | $lexical ? : |
51 | 0 | 49 | unless ($original) |
57 | 2 | 47 | defined $PROTOTYPE ? : |
61 | 0 | 49 | if $@ |
5 | 18 | $wantarray ? : | |
7 | 12 | unless do { local $_ = $Aspect::POINT; &$compiled() } | |
2 | 10 | if $wantarray | |
101 | 16 | 28 | unless $lexical |
116 | 0 | 44 | if ($pointcut->match_contains('Aspect::Pointcut::Throwing')) |
121 | 0 | 44 | if ($pointcut->match_contains('Aspect::Pointcut::Returning')) |