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
LICENSE AND COPYRIGHT
© 2024-2026 Michal Josef Špaček
BSD 2-Clause License
VERSION
0.10