NAME

Mo::utils::Number::Alias - Mo number utilities, aliases.

SYNOPSIS

use Mo::utils::Number::Alias qw(
        check_int8 check_int16 check_int32 check_int64
        check_uint8 check_uint16 check_uint32 check_uint64
);

check_int8($self, $key);
check_int16($self, $key);
check_int32($self, $key);
check_int64($self, $key);
check_uint8($self, $key);
check_uint16($self, $key);
check_uint32($self, $key);
check_uint64($self, $key);

DESCRIPTION

Mo number aliases utilities for checking of data objects.

SUBROUTINES

check_int8

check_int8($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of integer numbers (-128, ... -2, -1, 0, 1, 2, ..., 127). Value could be undefined or doesn't exist.

Returns undef.

check_int16

check_int16($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of integer numbers (-32768, ... -2, -1, 0, 1, 2, ..., 32767). Value could be undefined or doesn't exist.

Returns undef.

check_int32

check_int32($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of integer numbers (-2147483648, ... -2, -1, 0, 1, 2, ..., 2147483647). Value could be undefined or doesn't exist.

Returns undef.

check_int64

check_int64($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of integer numbers (-9223372036854775808, ... -2, -1, 0, 1, 2, ..., 9223372036854775807). Value could be undefined or doesn't exist.

Returns undef.

check_uint8

check_uint8($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of natural numbers (0, 1, 2, ..., 255). Value could be undefined or doesn't exist.

Returns undef.

check_uint16

check_uint16($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of natural numbers (0, 1, 2, ..., 65535). Value could be undefined or doesn't exist.

Returns undef.

check_uint32

check_uint32($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of natural numbers (0, 1, 2, ..., 4294967295). Value could be undefined or doesn't exist.

Returns undef.

check_uint64

check_uint64($self, $key);

Since version 0.09.

Check parameter defined by $key if it's in range of natural numbers (0, 1, 2, ..., 18446744073709551615). Value could be undefined or doesn't exist.

Returns undef.

ERRORS

check_int8():
        From Mo::utils::Number::Range::check_int_range():
                Parameter '%s' must be a integer.
                        Value: %s
                Parameter '%s' must be a integer between -128 and 127.
                        Value: %s

check_int16():
        From Mo::utils::Number::Range::check_int_range():
                Parameter '%s' must be a integer.
                        Value: %s
                Parameter '%s' must be a integer between -32768 and 32767.
                        Value: %s

check_int32():
        From Mo::utils::Number::Range::check_int_range():
                Parameter '%s' must be a integer.
                        Value: %s
                Parameter '%s' must be a integer between -2147483648 and 2147483647.
                        Value: %s

check_int64():
        From Mo::utils::Number::Range::check_int_range():
                Parameter '%s' must be a integer.
                        Value: %s
                Parameter '%s' must be a integer between -9223372036854775808 and 9223372036854775807.
                        Value: %s

check_uint8():
        From Mo::utils::Number::Range::check_natural_range():
                Parameter '%s' must be a natural number.
                        Value: %s
                Parameter '%s' must be a natural number between 0 and 255.
                        Value: %s

check_uint16():
        From Mo::utils::Number::Range::check_natural_range():
                Parameter '%s' must be a natural number.
                        Value: %s
                Parameter '%s' must be a natural number between 0 and 65535.
                        Value: %s

check_uint32():
        From Mo::utils::Number::Range::check_natural_range():
                Parameter '%s' must be a natural number.
                        Value: %s
                Parameter '%s' must be a natural number between 0 and 4294967295.
                        Value: %s

check_uint64():
        From Mo::utils::Number::Range::check_natural_range():
                Parameter '%s' must be a natural number.
                        Value: %s
                Parameter '%s' must be a natural number between 0 and 18446744073709551615.
                        Value: %s

EXAMPLE1

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_int8);

my $self = {
        'key' => -2,
};
check_int8($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE2

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_int8);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => -300,
};
check_int8($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a integer between -128 and 127.

EXAMPLE3

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_int16);

my $self = {
        'key' => -2,
};
check_int16($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE4

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_int16);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => -300000,
};
check_int16($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a integer between -32768 and 32767.

EXAMPLE5

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_int32);

my $self = {
        'key' => -2,
};
check_int32($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE6

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_int32);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => -30000000000,
};
check_int32($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a integer between -2147483648 and 2147483647.

EXAMPLE7

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_int64);

my $self = {
        'key' => -2,
};
check_int64($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE8

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_int64);
use Math::BigInt;

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => Math::BigInt->new(-30000000000000000000),
};
check_int64($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a integer between -9223372036854775808 and 9223372036854775807.

EXAMPLE9

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_uint8);

my $self = {
        'key' => 2,
};
check_uint8($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE10

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_uint8);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => 300,
};
check_uint8($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a natural number between 0 and 255.

EXAMPLE11

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_uint16);

my $self = {
        'key' => 60000,
};
check_uint16($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE12

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_uint16);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => 300000,
};
check_uint16($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a natural number between 0 and 65535.

EXAMPLE13

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_uint32);

my $self = {
        'key' => 3000000000,
};
check_uint32($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE14

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_uint32);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => 300000000000,
};
check_uint32($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a natural number between 0 and 4294967295.

EXAMPLE15

use strict;
use warnings;

use Mo::utils::Number::Alias qw(check_uint64);

my $self = {
        'key' => 200000000000,
};
check_uint64($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE16

use strict;
use warnings;

use Error::Pure;
use Mo::utils::Number::Alias qw(check_uint64);
use Math::BigInt;

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => Math::BigInt->new(30000000000000000000),
};
check_uint64($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...Range.pm:?] Parameter 'key' must be a natural number between 0 and 18446744073709551615.

DEPENDENCIES

Exporter, Mo::utils::Number::Range, Readonly.

SEE ALSO

Mo::utils::Number

Mo number utilities.

Mo

Micro Objects. Mo is less.

Mo::utils

Mo utilities.

REPOSITORY

https://github.com/michal-josef-spacek/Mo-utils-Number

AUTHOR

Michal Josef Špaček mailto:skim@cpan.org

http://skim.cz

LICENSE AND COPYRIGHT

© 2024-2026 Michal Josef Špaček

BSD 2-Clause License

VERSION

0.10