| blib/lib/Number/Compare.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 14 | 92.8 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 0 | 13 | unless $test =~ /^ ([<>]=?)? # comparison (.*?) # value ([kmg]i?)? # magnitude $/xi |
| 29 | 1 | 12 | if lc $magnitude eq 'k' |
| 30 | 3 | 10 | if lc $magnitude eq 'ki' |
| 31 | 1 | 12 | if lc $magnitude eq 'm' |
| 32 | 1 | 12 | if lc $magnitude eq 'mi' |
| 33 | 1 | 12 | if lc $magnitude eq 'g' |
| 34 | 1 | 12 | if lc $magnitude eq 'gi' |