| blib/lib/Algorithm/CheckDigits/M10_002.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 16 | 56.2 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 4 | 0 | if ($number =~ /^([0-9 ]*)([0-9])$/) |
| 31 | 2 | 0 | if ($number =~ /^[0-9 ]*$/) |
| 39 | 2 | 0 | if ($number =~ /^([0-9 ]*)([0-9])$/) |
| 40 | 2 | 0 | if $2 == $self->_compute_checkdigit($1) |
| 47 | 2 | 0 | if ($number =~ /^([0-9 ]*)([0-9])$/) |
| 48 | 2 | 0 | if $2 == $self->_compute_checkdigit($1) |
| 57 | 10 | 0 | if ($number =~ /^([0-9]*)$/) |
| 62 | 55 | 50 | if ($even) { } |