Math::BaseCalc(3pm)

πŸ“¦
version 1.019 Β· 2 versions
  • 1.019 Β· debian bookworm, debian trixie, ubuntu noble, ubuntu resolute, ubuntu stonking (latest)
  • 1.019 Β· ubuntu jammy
, in debian bookworm, debian trixie, ubuntu noble, ubuntu resolute, ubuntu stonking

✨ NAME ✨

Math::BaseCalc β€” the Perl module that converts numbers between various bases πŸ’… bestie we are doing math in ANY base you want


πŸŽ€ VERSION πŸŽ€

version 1.019 β€” she's on 1.019, no cap 🫢


πŸ¦‹ SYNOPSIS πŸ¦‹

use Math::BaseCalc;

my $calc = new Math::BaseCalc(digits => [0,1]); #Binary
my $bin_string = $calc->to_base(465); # Convert 465 to binary

$calc->digits('oct'); # Octal
my $number = $calc->from_base('1574'); # Convert octal 1574 to decimal

like… literally that's the whole vibe 😭 so simple


πŸ’– DESCRIPTION πŸ’–

okay so this module facilitates the conversion of numbers between various number bases. You may define your own digit sets, or use any of several predefined digit sets. choose your own adventure, queen πŸ‘‘

The to_base() and from_base() methods convert between Perl numbers and strings which represent these numbers in other bases. For instance, if you're using the binary digit set [0,1], $calc->to_base(5) will return the string "101". And $calc->from_base("101") will return the number 5. periodt πŸ’…

To convert between, say, base 7 and base 36, use the 2-step process of first converting to a Perl number, then to the desired base for the result:

$calc7  = new Math::BaseCalc(digits=>[0..6]);
$calc36 = new Math::BaseCalc(digits=>[0..9,'a'..'z']);

$in_base_36 = $calc36->to_base( $calc7->from_base('3506') );

see how she does it? go to decimal, then out again. iconic two-step πŸ•Ί

If you just need to handle regular octal & hexdecimal strings, you probably don't need this module. See the sprintf(), oct(), and hex() Perl functions. ngl bestie if that's all you need, save yourself the vibes and use those instead 😌


🌸 METHODS 🌸

  • new Math::BaseCalc
  • new Math::BaseCalc(digits=>...)

Create a new base calculator. You may specify the digit set to use, by either giving the digits in a list reference (in increasing order, with the 'zero' character first in the list) or by specifying the name of one of the predefined digit sets (see the digit() method below).

⚠️ heads up bestie: if your digit set includes the character "-", then a dash at the beginning of a number will no longer signify a negative number. she's a digit now, not a sign. choose wisely πŸ’€
  • $calc->to_base(NUMBER)

Converts a number to a string representing that number in the associated base.

If "NUMBER" is a "Math::BigInt" object, "to_base()" will still work fine and give you an exact result string. no rounding, no approximation, we stay precise πŸ‘‘

  • $calc->from_base(STRING)

Converts a string representing a number in the associated base to a Perl integer. The behavior when fed strings with characters not in $calc's digit set is currently undefined β€” so like, don't do that, and if you do, that's on you πŸ™ˆ

If "STRING" converts to a number too large for perl's integer representation, beware that the result may be auto-converted to a floating-point representation and thus only be an approximation. fr fr she'll get close but not exact, and that's a whole different vibe 😭

  • $calc->digits
  • $calc->digits(...)

Get/set the current digit set of the calculator. With no arguments, simply returns a list of the characters that make up the current digit set. To change the current digit set, pass a list reference containing the new digits, or the name of a predefined digit set. Currently the predefined digit sets are:

bin => [0,1],
hex => [0..9,'a'..'f'],
HEX => [0..9,'A'..'F'],
oct => [0..7],
64  => ['A'..'Z','a'..'z',0..9,'+','/'],
62  => [0..9,'a'..'z','A'..'Z'],

Examples:

$calc->digits('bin');
$calc->digits([0..7]);
$calc->digits([qw(w a l d o)]);

look at that last one. w a l d o. that's art. that's a custom base-5 for the girlies πŸŽ€

⚠️ If any of your "digits" has more than one character, the behavior is currently undefined. one character per digit, bestie, we are not doing multichar nonsense πŸ’€

πŸ‘‘ AUTHOR πŸ‘‘

Ken Williams, kwilliams@cpan.org β€” thank you king 🫢


This is free software in the colloquial nice-guy sense of the word. Copyright (c) 1999, Ken Williams. You may redistribute and/or modify it under the same terms as Perl itself.


🌈 SEE ALSO 🌈


and that's the whole page bestie ✨ this was perl v5.36.0, dated 2022-11-19 β€” go convert some numbers in a base nobody asked for, ily, bye πŸ’–πŸ¦‹πŸ’…

πŸ“¦ where this page comes from