Branch Coverage

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


line true false branch
55 2 0 if ($number =~ /^(\d+)(\d)$/i)
56 1 1 if $2 == $self->_compute_checkdigit(uc $1)
63 1 0 if ($number =~ /^\d+$/i)
71 1 0 if ($number =~ /^(\d+)(\d)$/i)
72 1 0 if $2 == $self->_compute_checkdigit(uc $1)
79 1 0 if ($number =~ /^(\d+)(\d)$/i)
80 1 0 if $2 == $self->_compute_checkdigit(uc $1)