# Check digit verification

Need to verify check digit on document numbers.

the algorithm is supplied below

* MUST BE IN PERL IF YOU CANNOT DO IT IN PERL DONT BID!

* READ ENTIRE PROJECT BEFORE BIDDING OTHERWISE WILL BE IGNORED

Algorithm:

Check Digit Calculations

First, break the input into individual characteres and numbers.

Next, convert non-digits into numbers. A through Z are encoded to 10 through 25. The filler character < is encoded as 0.

< A B C D E F G H I J K L M N O P Q R S T U V W X Y Z

0 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35

Now, multiply each number by the corresponding weighting. The first digit is multipled by 7, the next by 3, and the next by 1. The pattern then repeats (7, 3, 1, 7, 3, 1, 7, 3, 1, etc).

Add up the results, then divide by 10. The remainder is the check digit.

As a special case, if the personal number on the second line is not used (and thus entirely filled with the filler character <), the check digit for that section can be replaced with the filler character <.

An example for the input AB2134:

Input: A B 2 1 3 4 < < <

Value: 10 11 2 1 3 4 0 0 0

Weight: 7 3 1 7 3 1 7 3 1

Products: 70 33 2 7 9 4 0 0 0

Sum: 70 + 33 + 2 + 7 + 9 + 4 + 0 + 0 + 0 = 125

Division: 125 ÷ 10 = 12, remainder 5

Taidot: Perl

Tietoa työnantajasta:
( 4 arvostelua ) Oakville, Canada

Projektin tunnus: #4235119

## Myönnetty käyttäjälle:

idleswell

Hello, I will create a Perl script to compute a check digit according to your specifications. The script will take its input from the command line. All computations of the check digit will be within an internal subr Lisää

(98 Arvostelua)
5.6

## 5 freelanceria on tarjonnut keskimäärin %project_bid_stats_avg_sub_26% %project_currencyDetails_sign_sub_27% tähän työhön

barundebnath

Hi, This is a pretty easy job with perl. I can finish it very easily. Thanks

(5 arvostelua)
4.3
PerlIsFun

I'd be glad to help. Thank you.

(9 arvostelua)
3.6
dreamci

(7 arvostelua)
2.9
supersoftrays