blib/lib/Algorithm/CheckDigits/M10_011.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 9 | 16 | 56.2 |
line | true | false | branch |
---|---|---|---|
23 | 2 | 0 | if ($number =~ /^(.*)([0-9])$/) |
32 | 1 | 0 | if ($cd != -1) |
40 | 1 | 0 | if ($number =~ /^(.*)([0-9])$/) |
41 | 1 | 0 | if $2 == $self->_compute_checkdigit($1) |
48 | 1 | 0 | if ($number =~ /^(.*)([0-9])$/) |
49 | 1 | 0 | if $2 == $self->_compute_checkdigit($1) |
60 | 5 | 0 | if ($number =~ /^([0-9]*)$/) |
66 | 35 | 40 | if $even |