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) { } |