lib/Aspect/AdviceContext.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 22 | 63.6 |
line | true | false | branch |
---|---|---|---|
9 | 0 | 17 | unless $spec{'sub_name'} |
22 | 0 | 1 | if (wantarray) { } |
32 | 9 | 0 | if @_ == 1 |
47 | 17 | 1 | if @_ == 1 |
57 | 0 | 1 | unless $name =~ /::/ |
65 | 0 | 1 | unless $name =~ /::/ |
72 | 13 | 10 | if (@_ == 1) |
74 | 0 | 13 | wantarray && ref $return_value eq 'ARRAY' ? : |
85 | 0 | 10 | if $key =~ /DESTROY$/ |
92 | 0 | 49 | unless exists $$self{$key} |
94 | 9 | 40 | wantarray && ref $value eq 'ARRAY' ? : |