blib/lib/Algorithm/CheckDigits/M11_003.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 18 | 55.5 |
line | true | false | branch |
---|---|---|---|
25 | 4 | 0 | if ($number =~ /^(\d{11})(\d)$/) |
33 | 2 | 0 | if ($number =~ /^\d{11}$/) |
35 | 0 | 2 | 0 > $cd ? : |
42 | 2 | 0 | if ($number =~ /^(\d{11})(\d)$/) |
43 | 2 | 0 | if $2 == $self->_compute_checkdigit($1) |
50 | 2 | 0 | if ($number =~ /^(\d{11})(\d)$/) |
51 | 2 | 0 | if $2 == $self->_compute_checkdigit($1) |
60 | 10 | 0 | if ($number =~ /^\d{11}$/) |
73 | 10 | 55 | if 10 == ($sum + $weight[11] * $i) % 11 |