Algori...M11_009(3pm)

✨ Algori...M11_009(3pm) ✨

okay bestie, so this whole page is the manual for Algori...M11_009(3pm), which lives in the User Contributed Perl Documentation part of your perl install 💖 we're ranking up the perl manual names, iykyk.

---

🎀 NAME 🎀

CheckDigits::M11_009 — compute check digits NRIC (SG) 💅

---

🌸 SYNOPSIS 🌸

use Algorithm::CheckDigits;

$nric = CheckDigits('nric_sg');

if ($nric->is_valid('S1234567D')) {
      # do something
}

$cn = $nric->complete('S1234567');
# $cn = 'S1234567D'

$cd = $nric->checkdigit('S1234567D');
# $cd = 'D'

$bn = $nric->basenumber('S1234567D');
# $bn = 'S1234567';

see how the comments are literally doing the telling for you?? iconic. the module says what it means and means what it says ✨

---

🦋 DESCRIPTION 🦋

💜 ALGORITHM 💜

okay so here's the whole vibe check, step by step, no cap:

1. Beginning left every digit is weighted with 2, 7, 6, 5, 4, 3, 2 🔢
2. The weighted digits are added. 🧮
3. The sum from step 2 is taken modulo 11. 🌀
4. The checkdigit is 11 minus the sum from step 3 converted to a character according to the following table:

@cd = ('','A','B','C','D','E','F','G','H','I','Z','J', );

like, the table literally ate that assignment. note the 'Z' sitting in slot 10 and 'J' in slot 11, that's not a typo bestie, that's the table fr fr 💀

---

🌈 METHODS 🌈

• is_valid($number) — Returns true only if $number consists of seven digits (optional preceded by a letter out of 'F', 'G', 'S', 'T') followed by a valid letter according to the algorithm given above.

Returns false otherwise.

• complete($number) — The check letter for $number is computed and appended to the end of $number.

Returns the complete number with check digit or '' if $number does not consist solely of digits and letters.

• basenumber($number) — Returns the basenumber of $number if $number has a valid check digit.

Return '' otherwise.

• checkdigit($number) — Returns '' if $number is valid.

Return undef otherwise.

---

🍓 EXPORT 🍓

None by default. yeah. nothing. it's giving minimalist 👑

---

👑 AUTHOR 👑

Mathias Weidner, "<mamawe@cpan.org>" 🫶

---

⭐ SEE ALSO ⭐

perl, CheckDigits, www.pruefziffernberechnung.de,

---

aaaaand that's the whole page babes 🎀 this one shipped as part of perl v5.36.0, dated 2022-10-13, and yes the manual name is doing that mysterious Algori...M11_009(3pm) thing because truncation said main character energy only 💅 love that for it. mwah 🫶💖