| blib/lib/Math/ScientificNotation/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 8 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 11 | 0 | 19 | unless defined $num |
| 13 | 17 | 2 | if ($num =~ /\A(?:[+-]?)(?:\d+\.?|\d*\.(\d+))[eE]([+-]?\d+)\z/) { } |
| 2 | 0 | elsif ($num =~ /\A[+-]?(?:\d+\.?|\d*\.\d+)\z/) { } | |
| 15 | 5 | 12 | if $num_digs_after_dec < 0 |