| blib/lib/ByteBeat/RPN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 34 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 10 | 0 | 0 | unless ref $list |
| 11 | 0 | 0 | if ($self->rule eq 'power') { } |
| 34 | 0 | 0 | /t/ ? : |
| 40 | 0 | 0 | if @$rpn == 1 |
| 45 | 0 | 0 | $op eq '**' ? : |
| 0 | 0 | $op eq '%' ? : | |
| 0 | 0 | $op eq '/' ? : | |
| 0 | 0 | $op eq '*' ? : | |
| 0 | 0 | $op eq '-' ? : | |
| 0 | 0 | $op eq '+' ? : | |
| 0 | 0 | $op eq '<<' ? : | |
| 0 | 0 | $op eq '>>' ? : | |
| 0 | 0 | $op eq '&' ? : | |
| 0 | 0 | $op eq '|' ? : | |
| 0 | 0 | $op eq '^' ? : | |
| 61 | 0 | 0 | if (ref $$rpn[-1] eq 'ARRAY') { } |
| 0 | 0 | elsif (not $$rpn[-1] =~ /^\d+$/) { } |