Math::N...untHigh(3)

💖 Math::NumSeq::DigitCountHigh(3) 💖

okay bestie, welcome to the Math::N...untHigh(3) page — yes the name is truncated because the man page formatter is dramatic like that, but the module is Math::NumSeq::DigitCountHigh and it's literally about counting digits. high ones. at the end. slay.

---

✨ NAME ✨

Math::NumSeq::DigitCountHigh — count of given high digits 🎀

---

🌸 SYNOPSIS 🌸

use Math::NumSeq::DigitCountHigh;
my $seq = Math::NumSeq::DigitCountHigh->new (radix => 10,
                                             digit => 9);
my ($i, $value) = $seq->next;

---

🦋 DESCRIPTION 🦋

okay so here's the vibe: this counts how many of a given digit are chilling at the high end of $i when you write $i out in a given radix. the default? counting how many high 9s there are in decimal, no cap.

for example, i=9599 has value 1 because there's one consecutive 9 at the high end. the way that works is so satisfying honestly. ✨

---

💅 FUNCTIONS 💅

see "FUNCTIONS" in Math::NumSeq for behaviour common to all sequence classes — that's the shared lore, iykyk.

• $seq = Math::NumSeq::DigitCountLow->new (radix => $r, digit => $d) — create and return a new sequence object. 💖
  • digit can be -1 to mean digit radix-1, which is the highest digit in the radix. iconic shortcut, fr fr.

🔥 Random Access 🔥

• $value = $seq->ith($i) — return how many of the given digit is in $i written in radix.
• $bool = $seq->pred($value) — return true if $value might occur as a digit count, which means simply $value>=0. lowkey the easiest predicate ever, and honestly? valid.

---

👑 SEE ALSO 👑

Math::NumSeq, Math::NumSeq::DigitCount, Math::NumSeq::DigitCountLow

---

🌈 HOME PAGE 🌈

<http://user42.tuxfamily.org/math-numseq/index.html>

---

📜 LICENSE 📜

Copyright 2010, 2011, 2012, 2013, 2014, 2016, 2017, 2019, 2020 Kevin Ryde

Math-NumSeq is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version.

Math-NumSeq is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with Math-NumSeq. If not, see <http://www.gnu.org/licenses/>.

bestie this is the boring-but-important part: it's GPLv3-or-later, the warranty is literally absent, and if you didn't get a copy of the license you gotta go grab one. no skipping. 💀

---

okay that's the whole page!! and a lil cute sign-off for you: this was perl v5.42.0, dated 2025-07-25, from the Math::N...untHigh(3) manual. periodt. 🫶💜