NAME

POSIX::1003::Math - POSIX handling time

SYNOPSIS

use POSIX::1003::Math qw/ceil floor sqrt/;
print ceil 3.14;
print sqrt floor 4.9;

DESCRIPTION

Be aware that math in Perl has unclear precission! Be aware that the math library often provides many variations of these functions... it is hard to determine which one is used. Probably, Math::Trig will serve you better. Or PDL for real number crunchers.

Be warned that these functions do not have an obligatory scalar parameter, but only an optional parameter (defaults to $_). This means that they have the lowest (is list) priority.

FUNCTIONS

Standard POSIX via this module (via POSIX.xs)

Like the built-in sin, cos, and sqrt, the EXPR defaults to $_ and there is a scalar context (missing from POSIX.pm).

acos($expr)
asin($expr)
atan($expr)
ceil($expr)
cosh($expr)
div($numer, $denominator)

Devide $numer by $denominator. The result is a list of two: quotient and remainder. Implemented in Perl for completeness, currently not with the speed of XS.

my ($quotient, $remainder) = div($number, $denom);
floor($expr)
fmod($expr, $expr)
frexp($expr)
ldexp($expr)
log10($expr)
modf($expr, $expr)
pow($expr1, $expr2)

Returns $expr1 ** $expr2

rint($number)

Round to the closest integer. Implemented in Perl for completeness.

sinh($expr)
tan($expr)
tanh($expr)

Standard POSIX, using CORE

A small set of mathematical functions are available in Perl CORE, without the need to load this module. But if you do import them, it simply gets ignored.

abs( [$expr] )
atan2($expr, $expr)
cos( [$expr] )
exp( [$expr] )
log( [$expr] )
rand( [$expr] )
sin( [$expr] )
sqrt( [$expr] )
srand( [$expr] )

Numeric conversions

All strto*, atof, atoi and friends functions are usually not needed in Perl programs: the integer and float types are at their largest size, so when a string is used in numeric context it will get converted automatically. Still, POSIX.xs does provide a few of those functions, which are sometimes more accurate in number parsing for large numbers.

All three provided functions treat errors the same way. Truly POSIX-compliant systems set $ERRNO ($!) to indicate a translation error, so clear $! before calling strto*. Non-compliant systems may not check for overflow, and therefore will never set $!.

To parse a string $str as a floating point number use

$! = 0;
($num, $n_unparsed) = strtod($str);

if($str eq '' || $n_unparsed != 0 || $!) {
    die "Non-numeric input $str" . ($! ? ": $!\n" : "\n");
}

# When you do not care about handling errors, you can do
$num = strtod($str);
$num = $str + 0;     # same: Perl auto-converts
strtod(STRING)

String to double translation. Returns the parsed number and the number of characters in the unparsed portion of the string. When called in a scalar context strtod returns the parsed number.

strtol(STRING, $base)

String to integer translation. Returns the parsed number and the number of characters in the unparsed portion of the string. When called in a scalar context strtol returns the parsed number.

The base should be zero or between 2 and 36, inclusive. When the base is zero or omitted strtol will use the string itself to determine the base: a leading "0x" or "0X" means hexadecimal; a leading "0" means octal; any other leading characters mean decimal. Thus, "1234" is parsed as a decimal number, "01234" as an octal number, and "0x1234" as a hexadecimal number.

strtoul(STRING, $base)

String to unsigned integer translation, which behaves like strtol.

CONSTANTS

The following constants are exported, shown here with the values discovered during installation of this module:

The constant names for this math module are inserted here during installation.

SEE ALSO

This module is part of POSIX-1003 distribution version 1.02, built on November 10, 2020. Website: http://perl.overmeer.net/CPAN. The code is based on POSIX, which is released with Perl itself. See also POSIX::Util for additional functionality.

COPYRIGHTS

Copyrights 2011-2020 on the perl code and the related documentation by [Mark Overmeer]. For other contributors see ChangeLog.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://dev.perl.org/licenses/