| blib/lib/PPI/Token/Number/Exp.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 48 | 0 | 13 | if $self->{'_error'} |
| 62 | 2 | 11 | if ($exponent < 0) |
| 70 | 12 | 10 | if ($exponent & $bit) |
| 77 | 1 | 12 | $neg ? : |
| 78 | 2 | 11 | $negpow ? : |
| 96 | 9 | 86 | if $char eq "_" |
| 99 | 45 | 41 | if $char =~ /\d/o |
| 102 | 16 | 25 | if ($t->{'token'}{'content'} =~ /e$/i) |
| 104 | 16 | 0 | if $char eq "-" or $char eq "+" |
| 107 | 0 | 0 | if ($t->{'token'}{'content'} =~ s/\.(e)$//i) { } |