Linux and UNIX Man Pages

Linux & Unix Commands - Search Man Pages

algorithm::checkdigits::m10_011(3pm) [debian man page]

CheckDigits::M10_011(3pm)				User Contributed Perl Documentation				 CheckDigits::M10_011(3pm)

NAME
CheckDigits::M10_011 - compute check digits UPS (US) SYNOPSIS
use Algorithm::CheckDigits; $ups = CheckDigits('ups'); if ($ups->is_valid('1Z 591580 68 55587736')) { # do something } $cn = $ups->complete('1Z 591580 68 5558773'); # $cn = '1Z 591580 68 55587736' $cd = $ups->checkdigit('1Z 591580 68 55587736'); # $cd = '6' $bn = $ups->basenumber('1Z 591580 68 55587736'); # $bn = '1Z 591580 68 5558773' DESCRIPTION
ALGORITHM 1. Beginning left all numbers are weighted alternatively 1 and 2. 2. The sum of all products is computed. 3. The sum of step 3 ist taken modulo 10. 4. The check digit is the difference between 10 and the number from step 3. METHODS is_valid($number) Returns true only if $number consists solely of numbers and the last digit is a valid check digit according to the algorithm given above. Returns false otherwise, complete($number) The check digit for $number is computed and concatenated to the end of $number. Returns the complete number with check digit or '' if $number does not consist solely of digits and spaces. basenumber($number) Returns the basenumber of $number if $number has a valid check digit. Return '' otherwise. checkdigit($number) Returns the checkdigit of $number if $number has a valid check digit. Return '' otherwise. EXPORT None by default. AUTHOR
Mathias Weidner, <mathias@weidner.in-bad-schmiedeberg.de> SEE ALSO
perl, CheckDigits, www.pruefziffernberechnung.de. perl v5.10.0 2008-05-17 CheckDigits::M10_011(3pm)

Check Out this Related Man Page

CheckDigits::M10_003(3pm)				User Contributed Perl Documentation				 CheckDigits::M10_003(3pm)

NAME
CheckDigits::M10_003 - compute check digits for ISMN SYNOPSIS
use Algorithm::CheckDigits; $ismn = CheckDigits('ismn'); if ($ismn->is_valid('M-345-24680-5')) { # do something } $cn = $ismn->complete('M-345-24680'); # $cn = 'M-345-24680-5' $cd = $ismn->checkdigit('M-345-24680-5'); # $cd = '5' $bn = $ismn->basenumber('M-345-24680-5'); # $bn = 'M-345-24680' DESCRIPTION
ALGORITHM 1. The 'M' as the first number gets the value 3. Beginning left all numbers are weighted alternatively 3 and 1. 2. The sum of all products is computed. 3. The sum of step 3 ist taken modulo 10. 4. The check digit is the difference between 10 and the number from step 3 taken modulo 10. METHODS is_valid($number) Returns true only if $number consists solely of numbers and the last digit is a valid check digit according to the algorithm given above. Returns false otherwise, complete($number) The check digit for $number is computed and concatenated to the end of $number. Returns the complete number with check digit or '' if $number does not consist solely of digits and spaces. basenumber($number) Returns the basenumber of $number if $number has a valid check digit. Return '' otherwise. checkdigit($number) Returns the checkdigit of $number if $number has a valid check digit. Return '' otherwise. EXPORT None by default. AUTHOR
Mathias Weidner, <mathias@weidner.in-bad-schmiedeberg.de> SEE ALSO
perl, CheckDigits, www.pruefziffernberechnung.de. perl v5.10.0 2008-05-17 CheckDigits::M10_003(3pm)
Man Page

We Also Found This Discussion For You

1. Solaris

APC PowerChute

hi, got a problem with my ups after replacing the batterie.. there is no connection to the ups. when i plug this ups into a windows - laptop i can speak to it, but in solaris not. there are no messages in powerchute.err and the deamon upsd is running. restarting the deamon doesn't change... (4 Replies)
Discussion started by: pressy
4 Replies

Featured Tech Videos