| Name : perl-Math-Fleximal
| |
| Version : 0.06
| Vendor : obs://build_opensuse_org/devel:languages:perl
|
| Release : lp154.7.1
| Date : 2023-01-27 17:30:46
|
| Group : Development/Libraries/Perl
| Source RPM : perl-Math-Fleximal-0.06-lp154.7.1.src.rpm
|
| Size : 0.02 MB
| |
| Packager : https://www_suse_com/
| |
| Summary : Integers with flexible representations
|
Description :
This is a package for doing integer arithmetic while using a different base
representation than normal. In base n arithmetic you have n symbols which
have a representation. I was going to call them \"glyphs\", but being text
strings they are not really. On Tye McQueen\'s whimsical suggestion I
settled on the name Math::Fleximal, the set of text representations is
called a \"flex\", and the representation of individual digits are the
\"flecks\". These names are somewhat unofficial...
This allows you to do basic arithmetic using whatever digits you want, and
to convert from one to another.
Like \'Math::BigInt\' it is able to handle very large numbers, though
performance is not very good. (Which is also like \'Math::BigInt\', for good
performance you should be using < Bit::Vector>.) Instead use it as a version
of Math::BaseCalc without an upper limit on the size of numbers. A sample
use would be to put an MD5 hash into a convenient representation:
use Math::Fleximal;
use Digest::MD5 qw(md5_hex);
my $digest = hex2alpha(md5_hex($data));
sub hex2alpha {
Math::Fleximal->new(
lc(shift), [0..9, \'a\'..\'f\']
)->change_flex(
[0..9,\'a\'..\'z\',\'A\'..\'Z\']
)->to_str();
}
* \'new\'
Construct a new number. The arguments are the value, the anonymous array
of flecks that make up the flex, followed by an anonymous hash of other
arguments. The flex will default to [0..9] and the other arguments will
default to an empty hash.
This can be used to calculations in bases other than 10 - the base is
just the number of flecks in the flex. So you could construct a base 16
number with:
my $base_16 = new Math::Fleximal(\"4d\", [0..9, \'a\'..\'f\']);
If a value is passed it can be an existing Math::Fleximal or (as above) a
string that can be parsed with the current flex.
The possible keys to the optional arguments are:
* *
_+_ for the plus symbol to use. This defaults to \'+\'.
* *
_-_ for the minus symbol to use. This defaults to \'-\'.
* *
_show_+_ is a flag for whether to show the plus symbol on positive
numbers. This defaults to a false value.
* *
Whatever matches _strip_ will be stripped from the string before
parsing. This defaults to qr/[\\s\\.,_]/ to cover most of the common ways
that are used to group digits in a long number.
The parsing of a string into flecks is case sensitive. Also possibly
ambiguous parses are not handled very well.
* \'dup\'
Copy an existing number. This copy may be worked with without changing
the existing number. If dup is passed a value, the new instance will have
that value instead.
* \'set_value\'
This sets the internal value and returns the object.
You can either pass the new value an existing instance (which may be in
another base) or a string. When passed a string it first strips
whitespace. After that it accepts an optional +-, followed by a series of
flecks (there must be at least one) for the first to last digits. It will
be confused if the leading fleck starts with + or - and no sign is
included.
* \'to_str\'
Returns the string representation of the current value using the current
flex. This always includes a sign, with no white space in front of the
sign.
* \'base_10\'
Returns the internal value in a base 10 representation. The numbers
returned may be larger than Perl\'s usual integer representation can
handle.
* \'change_flex\'
Takes a new flex and converts the current to that. Will implicitly change
base if needed.
* \'add\'
Adds one or more numbers to the current one and returns the answer in the
current representation. The numbers may be objects in any base, or
strings of the current representation.
* \'mul\'
Multiplies one or more numbers to the current one and returns the answer
in the current representation. The numbers may be objects in any base, or
strings of the current representation.
* \'subtr\'
Subtracts one or more numbers from the current one and returns the answer
in the current representation. The numbers may be objects in any base, or
strings of the current representation.
* \'div\'
Divides one or more numbers from the current one and returns the answer
in the current representation. In list context it will return the answer
and an array of remainders in the current representation. The remainders
will be positive and less than the absolute value of the denominator. The
numbers may be objects in any base, or strings of the current
representation.
* \'gcd\'
Takes one or more numbers and calculates the gcd of this and the entire
list.
* \'mod\'
Does the divisions as \'div\' does and returns only the remainders. In
scalar context only the last remainder is returned. Thus the following
returns the ten-thousands digit:
my $digit = $number->mod(1000, 10);
* \'cmp\'
Pass another number, returns -1 if it is smaller than the other number, 0
if they are equal, and 1 if it is larger. (Much like cmp does with
strings.)
* \'one\'
Returns 1 in the current flex.
* \'zero\'
Returns 0 in the current flex.
|
RPM found in directory: /packages/linux-pbone/ftp5.gwdg.de/pub/opensuse/repositories/devel:/languages:/perl:/CPAN-M/15.4/noarch |
