Branch Coverage

blib/lib/Algorithm/CheckDigits/MXX_002.pm
Criterion Covered Total %
branch 8 14 57.1


line true false branch
24 6 0 if ($number =~ /^(\d{1,7}-?\d{2}-?)(\d)$/)
25 3 3 if $2 == $self->_compute_checkdigit($1)
32 3 0 if ($number =~ /^\d{1,7}-?\d{2}-?$/)
40 3 0 if ($number =~ /^(\d{1,7}-?\d{2}-?)(\d)$/)
41 3 0 if $2 == $self->_compute_checkdigit($1)
48 3 0 if ($number =~ /^(\d{1,7}-?\d{2}-?)(\d)$/)
49 3 0 if $2 == $self->_compute_checkdigit($1)