| blib/lib/Tags/Utils/Preserve.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 38 | 8 | 88 | if (scalar @{$self->{'preserved'};} and &any(sub { $tag eq $_; } , @{$$self{"preserved"};})) |
| 48 | 5 | 91 | wantarray ? : |
| 57 | 6 | 77 | if (scalar @{$stack;} and $tag eq $stack->[$LAST_INDEX]) |
| 59 | 6 | 0 | unless (scalar @{$stack;}) |
| 67 | 4 | 79 | wantarray ? : |
| 77 | 88 | 1 | wantarray ? : |