blib/lib/Algorithm/CheckDigits/M09_001.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 7 | 14 | 50.0 |
line | true | false | branch |
---|---|---|---|
19 | 4 | 0 | if ($number =~ /^([A-Za-z][0-9]{10})([0-9])$/) |
27 | 2 | 0 | if ($number =~ /^[A-Za-z][0-9]{10}$/) |
35 | 2 | 0 | if ($number =~ /^([A-Za-z][0-9]{10})([0-9])$/) |
36 | 2 | 0 | if $2 == _compute_checkdigit($1) |
43 | 2 | 0 | if ($number =~ /^([A-Za-z][0-9]{10})([0-9])$/) |
44 | 2 | 0 | if $2 == _compute_checkdigit($1) |
51 | 10 | 0 | if ($number =~ /^([A-Za-z])([0-9]{10})$/) |