SPVM::Fn - SPVM Starndard Functions
The Fn class of SPVM has methods for numbers, strings, general utilities.
use Fn; # Cut a newline LF my $line = (mutable string)copy "abc\n"; Fn->chomp($line); # Contains my $found = Fn->contains("pppabcde", "bcd"); # Split my $csv = "foo,bar,baz"; my $items = Fn->split(",", $string); # Join my $items = ["foo", "bar", "baz"]; my $csv = Fn->join(",", $items); # Constant values my $byte_max = Fn->BYTE_MAX(); my $short_max = Fn->SHORT_MAX(); my $int_max = Fn->INT_MAX(); my $long_max = Fn->LONG_MAX();
Returns -1. The return type is the int type.
int
Returns -2. The return type is the int type.
static method BYTE_MAX : int ();
The same as "INT8_MAX".
static method BYTE_MIN : int ();
The same as "INT8_MIN".
static method DBL_MAX : double ();
Returns the value of DBL_MAX macro defined in float.h header of the C language.
DBL_MAX
float.h
static method DBL_MIN : double ();
Returns the value of DBL_MIN macro defined in float.h header of the C language.
DBL_MIN
static method DOUBLE_MAX : double ();
The same as "DBL_MAX".
static method DOUBLE_MIN : double ();
The same as "DBL_MIN".
static method FLOAT_MAX : float ();
The same as "FLT_MAX".
static method FLOAT_MIN : float();
The same as "FLT_MIN".
static method FLT_MAX : float ();
Returns the value of FLT_MAX macro defined in float.h header of the C language.
FLT_MAX
static method FLT_MIN : float ();
Returns the value of FLT_MIN macro defined in float.h header of the C language.
FLT_MIN
static method INT16_MAX : int ();
Returns 32767. The maximum value of the signed 16bit integer.
static method INT16_MIN : int ();
Returns -32768. The minimal value of the signed 16bit integer.
static method INT32_MAX : int ();
Returns 2147483647. The maximum value of the signed 32bit integer.
static method INT32_MIN : int ();
Returns -2147483648. The minimal value of the signed 32bit integer.
static method INT64_MAX : long ();
Returns 9223372036854775807. The maximum value of the signed 64bit integer.
static method INT64_MIN : long ();
Returns -9223372036854775808. The minimal value of the signed 64bit integer.
static method INT8_MAX : int ();
Returns 127. The maximum value of the signed 8bit integer.
static method INT8_MIN : int ();
Returns -128. The minimal value of the signed 8bit integer.
static method INT_MAX : int ();
The same as "INT32_MAX".
static method INT_MIN : int ();
The same as "INT32_MIN".
static method LONG_MAX : long ();
The same as "INT64_MAX".
static method LONG_MIN : long ();
The same as "INT64_MIN".
static method RAND_MAX : int ();
Returns 2147483647.
static method SHORT_MAX : int ();
The same as "INT16_MAX".
static method SHORT_MIN : int ();
The same as "INT16_MIN".
static method UBYTE_MAX : int ();
The same as "UINT8_MAX".
static method UINT16_MAX : int ();
Returns -1. This represents 0xFFFF in the unsigned 16bit integer in 2's complement.
0xFFFF
static method UINT32_MAX : int ();
Returns -1. This represents 0xFFFFFFFF in the unsigned 32bit integer in 2's complement.
0xFFFFFFFF
static method UINT64_MAX : long ();
Returns -1. This represents 0xFFFFFFFFFFFFFFFF in the unsigned 64bit integer in 2's complement.
0xFFFFFFFFFFFFFFFF
static method UINT8_MAX : int ();
Returns -1. This represents 0xFF in the unsigned 8bit integer in 2's complement.
0xFF
static method UINT_MAX : int ();
The same as "UINT32_MAX".
static method ULONG_MAX : long
The same as "UINT64_MAX".
static method USHORT_MAX : int ();
The same as "UINT16_MAX".
static method abs : int ($value : int);
Returns the absolute value of the $value.
static method chomp : void ($string : mutable string);
Removes \r\n or \n at the end of the $string.
\r\n
\n
Exceptions:
The $string must be defined. Otherwize an exception is thrown.
static method chompr : string ($string : string);
Copies the $string and removes \r\n or \n at the end of the copied string and returns it.
static method chr : string ($code_point : int);
Converts the $code_point to the UTF-8 character and return it.
If the $code_point is not a Unicode scalar value, return undef.
static method contains : int ($string : string, $substring : string, $string_offset = 0 : int, $string_length = -1 : int);
The alias for the following code using ""index".
my $ret = Fn->index($string, $substring, $string_offset, $string_length) >= 0;
static method copy_string : string ($string : string);
The alias for the following code using the copy operator
my $ret = copy $string;
static method crand : int ($seed : int*);
Create a random number from 0 to "RAND_MAX" using the $seed and return it.
The $seed is updated.
This method is thread safe.
Examples:
use Sys::Time; my $seed = (int)Sys::Time->time; my $crand0 = Fn->crand(\$seed); my $crand1 = Fn->crand(\$seed);
static method equals_string_range : int ($string1 : string, $string1_offset : int, $string2 : string, $string2_offset : int, $length : int);
Compares $string1 + $string1_offset with $string2 + $string2_offset by the $length. If they are euqal, returns 1, otherwise returns 0.
If the $length is 0, returns 1.
The $string1 must be defined. Otherwize an exception is thrown.
The $string2 must be defined. Otherwize an exception is thrown.
The $string1_offset must be greater than or equal to 0. Otherwize an exception is thrown.
The $string2_offset must be greater than or equal to 0. Otherwize an exception is thrown.
static method get_code_point : int ($string : string, $offset_ref : int*);
Parses the UTF-8 character at the value reffered by $offset_ref of the $string and return its Unicode code point.
The offset is updated to the position of the next UTF-8 character.
If the offset is greater than the length of the string, return the value of "GET_CODE_POINT_ERROR_OVER_STRING_RANGE".
If the UTF-8 character is invalid, return the value of "GET_CODE_POINT_ERROR_INVALID_UTF8".
The $offset must be greater than or equal to 0. Otherwize an exception is thrown.
static method hex : int ($hex_string : string);
Converts the $hex_string to the int value and return it.
The $hex string must be defined. Otherwize an exception is thrown.
The length of the $hex string must be 1 to 8. Otherwize an exception is thrown.
The $hex string must contain only hex characters 0-9a-zA-Z. Otherwize an exception is thrown.
0-9a-zA-Z
static method index : int ($string : string, $substring : string, $begin = 0 : int, $end = -1 : int);
Searches for the $substring in the range of the $string from the $begin to the $end.
The search is performed from the beginning of the range of the $string.
If the $substring is found, returns the found offset, otherwise returns -1.
If the $end is less than 0, the $end is set to the length of the $string minus 1.
The $substring must be defined. Otherwize an exception is thrown.
The $begin must be greater than or equal to 0. Otherwize an exception is thrown.
The $end must be less than the length of the $string.
static method init_string : void ($string : mutable string, $ascii_code = 0 : int, $offset = 0 int, $length = -1);
Sets the characters in the $string from the $offset to the position proceeded by the $length to the $ascii_code.
If the $length is less than 0, the $length is set to the length of the $string - the $offset.
The $offset + the $length must be less than or equal to the length of the $string.
static method is_alnum : int ($code_point : int);
If the Unicode $code_point is an ASCII alphanumeric A-Za-z0-9, return 1. Otherwise return 0.
A-Za-z0-9
static method is_alpha : int ($code_point : int);
If the Unicode $code_point is an ASCII alphabetic A-Za-z, return 1. Otherwise return 0.
A-Za-z
static method is_array : int ($object : object);
If the $object is defined and the type of the $object is the array type, return 1. Otherwise return 0.
"is_array" in SPVM::Document::NativeAPI is used to check the type.
static method is_blank : int ($code_point : int);
If the Unicode $code_point is an ASCII blank 0x20(SP, ' '), 0x09(HT, '\t'), return 1. Otherwise return 0.
0x20(SP, ' ')
0x09(HT, '\t')
static method is_class : int ($object : object);
If the $object is defined and the type of the $object is the class type, return 1. Otherwise return 0.
"is_class" in SPVM::Document::NativeAPI is used to check the type.
static method is_cntrl : int ($code_point : int);
If the Unicode $code_point is an ASCII control character 0x00-0x1F, 0x7F, return 1. Otherwise return 0.
0x00-0x1F
0x7F
static method is_digit : int ($code_point : int);
If the Unicode $code_point is an ASCII decimal digit 0-9, return 1. Otherwise return 0.
static method is_graph : int ($code_point : int);
If the $character is an ASCII graphical character 0x21-0x7E, return 1. Otherwise return 0.
0x21-0x7E
static method is_hex_digit : int ($code_point : int);
If the $character is a hexadecimal digit 0-9a-fA-F, return 1. Otherwise return 0.
0-9a-fA-F
static method is_lower : int ($code_point : int);
If the Unicode $code_point is an ASCII lowercase character a-z, return 1. Otherwise return 0.
a-z
static method is_mulnum_array : int ($object : object);
If the $object is defined and the type of the $object is the multi-numeric array type, return 1. Otherwise return 0.
"is_mulnum_array" in SPVM::Document::NativeAPI is used to check the type.
static method is_numeric_array : int ($object : object);
If the $object is defined and the type of the $object is the numeric array type, return 1. Otherwise return 0.
"is_numeric_array" in SPVM::Document::NativeAPI is used to check the type.
static method is_object_array : int ($object : object);
If the $object is defined and the type of the $object is an object array type, return 1. Otherwise return 0.
"is_object_array" in SPVM::Document::NativeAPI is used to check the type.
static method is_perl_space : int ($code_point : int);
If the Unicode $code_point is an Perl ASCII space character 0x09(HT, '\t'), 0x0A(LF, '\n'), 0x0C(FF, '\f'), 0x0D(CR, '\r'), 0x20(SP, ' '), return 1. Otherwise return 0.
0x0A(LF, '\n')
0x0C(FF, '\f')
0x0D(CR, '\r')
Note that prior to Perl v5.18, \s in ASCII mode did not match the vertical tab 0x0B(VT). is_perl_space is the same as this behavior.
\s
0x0B(VT)
is_perl_space
Current Perl \s in ASCII mode is the same as "is_space".
static method is_perl_word : int ($code_point : int);
If the Unicode $code_point is an Perl ASCII word character a-zA-Z0-9_, return 1. Otherwise return 0.
a-zA-Z0-9_
static method is_pointer_class : int ($object : object);
If the $object is defined and the $object is a pointer class, return 1. Otherwise return 0.
"is_pointer_class" in SPVM::Document::NativeAPI is used to check the type.
static method is_print : int ($code_point : int);
If the Unicode $$code_point is an ASCII printable character 0x20-0x7E, return 1. Otherwise return 0.
$$code_point
0x20-0x7E
static method is_punct : int ($code_point : int);
If the Unicode $code_point is an ASCII a punctuation character 0x21-0x2F, 0x3A-0x40, 0x5B-0x60, 0x7B-0x7E, return 1. Otherwise return 0.
0x21-0x2F
0x3A-0x40
0x5B-0x60
0x7B-0x7E
static method is_space : int ($code_point : int);
If the Unicode $code_point is an ASCII a white-space 0x09(HT, '\t'), 0x0A(LF, '\n'), 0x0B(VT), 0x0C(FF, '\f'), 0x0D(CR, '\r'), 0x20(SP, ' ') return 1. Otherwise return 0.
static method is_upper : int ($code_point : int);
If the $code_point is an ASCII uppercase character A-Z, return 1. Otherwise return 0.
A-Z
static method is_xdigit : int ($code_point : int);
If the $code_point is an ASCII hexadecimal digit 0-9A-Fa-f, return 1. Otherwise return 0.
0-9A-Fa-f
static method join : string ($separator : string, $strings : string[]);
Concatenates the $strings with the $separater and return it.
The $strings must be defined. Otherwize an exception is thrown.
The $separator must be defined. Otherwize an exception is thrown.
static method labs : long ($value : long);
static method lc : string ($string : string);
Converts the ASCII uppercase characters A-Z in the $string to the corresponding ASCII lowercase characters a-z. And return it.
static method lcfirst : string ($string : string);
If the first character of the $string is an ASCII uppercase character A-Z, it is converted to the corresponding ASCII lowercase characters a-z. And return the converted string.
static method look_code_point : int ($string : string, $offset_ref : int*);
The same as "get_code_point", but the offset is not updated.
static method memcpy : void ($dest : object, $dest_offset : int, $source : object, $source_offset : int, $length : int);
Copies the range of the $source to the the range of the $dest.
The range of the $dest is from the $offset to the position proceeded by the $length of the destination.
The range of the $source is from the $offset to the position proceeded by the $length of the source.
The unit of the $offset and the $length is byte size.
byte
If the range of the $source and the range of the $dest overlap, the result is not guaranteed.
The $dest must be defined. Otherwize an exception is thrown.
The type of the $dest must be the string type, the numeric array type, or the multi-numeric array type. Otherwize an exception is thrown.
string
The $source must be defined. Otherwize an exception is thrown.
The type of the $source must be the string type, the numeric array type, or the multi-numeric array type. Otherwize an exception is thrown.
The $dest must not be a read-only string. Otherwise an exception is thrown.
The $length must be greater than or equal to 0. Otherwize an exception is thrown.
The $dest_offset + the $length must be less than or equal to the length of the $dest. Otherwize an exception is thrown.
The $source_offset + the $length must be less than or equal to the length of the $source. Otherwize an exception is thrown.
static method memmove : void ($dest : object, $dest_offset : int, $source : object, $source_offset : int, $length : int);
The same as "memcpy", but even if the range of the $source and the range of the $dest overlap, the result is guaranteed.
static method ord : int ($string : string);
The alias for the following code using "get_code_point".
my $offset = 0; my $code_point = Fn->get_code_point($string, \$offset);
static method powi : int ($base : int, $exponant : int);
Calculates the exponentiation from the $base number and the $exponant number.
The $exponant number must be greater than or equal to 0. Otherwize an exception is thrown.
If the $base number is 0, the $exponant number cannnot be 0.
static method powl : long ($base : long, $exponant : long);
static method rand : double ($seed : int*, $max = 1 : int);
Gets a 64bit floating point random number that is greater than or equal to 0 and less than 1 using the $seed.
If the $max is specified, the $max is multiplied to the return value.
The seed is updated.
use Sys::Time; my $seed = (int)Sys::Time->time; my $rand0 = Fn->rand(\$seed); my $rand1 = Fn->rand(\$seed);
static method repeat : double ($string : string, $count : int);
Concatenates the $string the number of times specified in the $count and return it.
The $repeat count must be greater than or equal to 0.
# "abcabcabc" my $repeat_string = Fn->repeat("abc", 3);
static method replace_chars : void ($string : mutable string, $from_ch : int, $to_ch : int);
Replaces all characters specified by the second argument in the $string with the characters specified by the third argument.
static method rindex : int ($string : string, $substring : string, $end = -1 : int, $begin = 0 : int);
The search is performed from the end of the range of the $string.
static method sizeof_native_int : int ();
Returns the native int size. This is the same value as sizeof(int) in the C language.
sizeof(int)
static method sizeof_native_pointer : int ();
Returns the native pointer size. This is the same value as sizeof(void*) in the C language.
sizeof(void*)
static method shorten : void ($string : mutable string, $length : int32_t);
Shortens the $string to the $length specified by the argument using "shorten" in SPVM::Document::NativeAPI.
If the length specified by the argument is greater than or equal to the length of the string, nothing is performed.
The $string must be defined.
static method shorten_null_char : void ($string : mutable string);
Shortens the $string just before the first null character \0.
\0
If null characters is not found, do nothing.
Example:
my $message = (mutable string)copy "foo\0bar"; # "foo" my $message_shoten = Fn->shorten_null_char($message);
static method split : string[] ($separator : string, $string : string, $limit = -1 : int);
If the $limit is less than 0, split the $string by the specific $separator and convert them to an string array and return it.
If the $limit is greater than than 0, the limit becomes the length of the maximam separated elements.
The $limit cannnot be 0. Otherwize an exception is thrown.
static method substr : string ($string : string, $offset : int, $length = -1 : int);
Gets the substring from the $string. The extracting range of the string is from the $offset to the position proceeded by the $length, and returns it.
If the length is less than 0, the length to the end of the string is calculated from the length of the $string and the $offset.
static method to_code_points : int[] ($string : string)
Converts the $string to the Unicode code points, and returns it.
The $string contains an invalid Unicode code point. Otherwize an exception is thrown.
static method to_double : double ($string : string);
Converts the $string to the double value using strtod in the C language.
double
strtod
The $string must be the string that can be parsed as a double number. Otherwize an exception is thrown.
The $string must be a double number in the $correct range. Otherwize an exception is thrown.
my $string = "1.25"; my $num = Fn->to_double($string);
static method to_float : float ($string : string);
Converts the $string to the double value using strtof in the C language.
strtof
The $string must be the string that can be parsed as a float number. Otherwize an exception is thrown.
The $string must be a float number in the $correct range. Otherwize an exception is thrown.
my $string = "1.25"; my $num = Fn->to_float($string);
static method to_int : int ($string : string, $digit : int);
The alias for the following code using "to_int_with_base".
my $ret = Fn->to_int_with_base($string, 10);
Converts the $string to the int value with $digit using strtol in the C language.
strtol
The $string must be the string that can be parsed as an int number. Otherwize an exception is thrown.
The $string must be an int number in the $correct range. Otherwize an exception is thrown.
my $string = "-2147483648"; my $num = Fn->to_int_with_base($string, 10);
static method to_long : long ($string : string);
The alias for the following code using "to_long_with_base".
my $ret = Fn->to_long_with_base($string, 10);
static method to_long_with_base : long ($string : string, $digit : int);
Converts the $string to the long value with $digit using strtoll in the C language.
long
strtoll
The $digit must be one of 2, 8, 10, or 16. Otherwize an exception is thrown.
The $string must be the string that can be parsed as a long number. Otherwize an exception is thrown.
The $string must be a long number in the $correct range. Otherwize an exception is thrown.
my $string = "-9223372036854775808"; my $num = Fn->to_long_with_base($string, 10);
static method to_lower : int ($code_point : int);
If the $code_point is the ASCII uppercase character A-Z, it is converted to the corresponding ASCII lowercase character a-z.
If the $code_point is not an ASCII uppercase character, return itself.
static method to_upper : int ($code_point : int);
If the $code_point is the ASCII lowercase character a-z, it is converted to the corresponding ASCII uppercase character A-Z.
If the $code_point is not an ASCII lowercase character, return itself.
static method to_utf8_chars : string[] ($string : string);
Converts the $string to UTF-8 characters, and returns it.
my $string = "あいうa"; # ["あ", "い", "う", "a"] my $utf8_chars = Fn->to_utf8_chars($string);
static method tr : string ($string : string, $pattern : string, $replace : string)
Replaced the range of $pattern with the range of $replace in a $string and returns a replaced string.
The range must be the format a-z or a. If the format is a, it is converted to a-a.
a
a-a
# The range format examples "a-z" "0-9" "a" "5" "0-9" "あ-ん"
The $pattern must be defined. Otherwize an exception is thrown.
The $replace must be defined. Otherwize an exception is thrown.
If the $string contains an invalid Unicode code point, an exception is thrown.
The range format of the (pattern|replace) cannnot be contain an invalid Unicode code point. If so, an exception is thrown. If so, an exception is thrown.
The second character ot the range format of the (pattern|replace) must be \"-\". Otherwize an exception is thrown.
The range format of the (pattern|replace) must be 1 or 3 characters. Otherwize an exception is thrown.
The exceptions of the "get_code_point"" in " method can be thrown.
{ my $string = "0123456789"; my $pattern = "0-9"; my $replace = "0-9"; # "0123456789" my $ret = Fn->tr($string, $pattern, $replace); } { my $string = "abcd"; my $pattern = "a-c"; my $replace = "x-z"; # "xyzd" my $ret = Fn->tr($string, $pattern, $replace); } }
static method trim : string ($string : string);
Removes the right and left spaces of the $string and return it.
The removed spaces is the same as the spaces "is_space" method returns 1.
static method uc : string ($string : string);
Converts the ASCII lowercase characters a-z in the $string to the corresponding ASCII uppercase characters A-Z. And return it.
static method ucfirst : string ($string : string);
If the first character of the $string is an ASCII lowercase characters a-z, it is converted to the corresponding ASCII uppercase character A-Z. And return the converted string.
static method utf8_length : int ($string : string)
Gets the length as a UTF-8 string from the $string, and returns it.
# 3 my $utf8_length = Fn->utf8_length("あいう");
static method utf8_substr : string ($string : string, $utf8_offset : int, $utf8_length = -1 : int);
Gets the substring from the $string. The extracting range of the string is from the $utf8_offset to the position proceeded by the $utf8_length, and returns it.
If the length is less than 0, the length to the end of the string is calculated from the length of the $string and the $utf8_offset.
The $utf8_offset + the $utf8_length must be less than or equal to the UTF-8 length of the $string. Otherwize an exception is thrown.
# "いえ" my $utf8_substr = Fn->utf8_substr("あいうえ", 1, 2);
static method merge_options : object[] ($options1 : object[], $options2 : object[]);
Creates a new any object array merging the $options1 and the $options2, and returns it.
If the $options2 contains the same key of the $options1, the key of the $options1 is overwritten by the key of $options2.
The $options1 must be defined. Otherwise an exception is thrown.
The $options2 must be defined. Otherwise an exception is thrown.
The length of the $options1 must be an even number. Otherwise an exception is thrown.
The length of the $options2 must be an even number. Otherwise an exception is thrown.
The key of the $options1 must be defined. Otherwise an exception is thrown.
The key of the $options1 must be the string type. Otherwise an exception is thrown.
The key of the $options2 must be defined. Otherwise an exception is thrown.
The key of the $options2 must be the string type. Otherwise an exception is thrown.
Exceptions of the Hash class can be thrown.
my $merged_options = Fn->merge_options({foo => 1, bar => 2}, {baz => 5});
static method object_to_int : int ($object : object);
Converts the address of the $object to a value of the int type, and returns it.
static method get_spvm_version_string : string ();
Returns the the version string of the SPVM language.
static method get_spvm_version_number : double ();
Returns the version number of the SPVM language.
static method get_version_number : double ($class_name : string);
Returns the version number of a class.
The $class_name must be defined. Otherwise an exception is thrown.
The class specified by the $class_name must be loaded. Otherwise an exception is thrown.
Copyright (c) 2023 Yuki Kimoto
MIT License
To install SPVM, copy and paste the appropriate command in to your terminal.
cpanm
cpanm SPVM
CPAN shell
perl -MCPAN -e shell install SPVM
For more information on module installation, please visit the detailed CPAN module installation guide.