| blib/lib/Perl/ToPerl6/Transformer/Variables/ReplaceNegativeIndex.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 12 | 50.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 39 | 56 | 1 | 4 | $_[1]->isa('PPI::Token::Symbol') and $_[1]->snext_sibling |
| 53 | 5 | 0 | 0 | $head->isa('PPI::Structure::Subscript') and $head->start eq '[' |
| 56 | 0 | 0 | 0 | $head->schild(0)->schild(0)->isa('PPI::Token::Number') and $head->schild(0)->schild(0)->content =~ /^ [-] /x |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 39 | 0 | 1 | 3 | $_[1]->snext_sibling->isa('PPI::Structure::Subscript') or $_[1]->snext_sibling->isa('PPI::Token::Operator') |