blib/lib/Lingua/JBO/Numbers.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 16 | 87.5 |
line | true | false | branch |
---|---|---|---|
32 | 1 | 88 | unless defined $number |
33 | 1 | 87 | if $number eq 'NaN' |
35 | 3 | 84 | if ($number =~ /^ ( [-+] )? inf $/xi) { } |
77 | 7 | elsif ($number =~ /^ $Lingua::JBO::Numbers::RE{'num'}{'real'}{-'keep'} $/x) { } | |
37 | 2 | 1 | $1 ? : |
45 | 77 | 0 | defined $int ? : |
49 | 14 | 63 | if (defined $frac and $frac ne $EMPTY_STR) |
67 | 0 | 25 | unless defined $name |