my $check = chop $digits;