Check digit verification

Completado Publicado Feb 11, 2013 Pagado a la entrega
Completado Pagado a la entrega

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

Perl

Nº del proyecto: #4235119

Sobre el proyecto

5 propuestas Proyecto remoto Activo Feb 11, 2013

Adjudicado a:

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 Más

$48 CAD en 2 días
(98 comentarios)
5.6

5 freelancers están ofertando un promedio de $67 por este trabajo

barundebnath

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

$50 CAD en 2 días
(5 comentarios)
4.3
PerlIsFun

I'd be glad to help. Thank you.

$49 CAD en 1 día
(9 comentarios)
3.6
dreamci

Hello, please check pm

$150 CAD en 1 día
(7 comentarios)
2.9
supersoftrays

Best work will be provided. Please check your mailbox.

$40 CAD en 3 días
(3 comentarios)
2.6
NickyJones

Hello, sir. I have read your algorithm. Will complete it in perl. Thanks.

$100 CAD en 1 día
(0 comentarios)
0.0