Perl int()函数

Perl中的int()函数返回给定值的整数部分。如果没有提供值，则返回$。注意，$是默认的输入值，在这种情况下是0。int()函数不做四舍五入处理。对于将一个值四舍五入为整数，可以使用sprintf。

语法： int(VAR)

参数：

VAR：要转换为整数的值

返回： 返回VAR的整数部分

例子 1 :

#!/usr/bin/perl
  
# Passing positive decimal value
int_val = int(19.8547);
print"Integer value isint_val\n";
  
# Passing negative decimal value
int_val = int(-18.659);
print"Integer value isint_val\n";

输出

Integer value is 19
Integer value is -18

例2:

#!/usr/bin/perl
  
# Passing fractional positive value
int_val = int(17 / 4);
print"Integer value isint_val\n";
  
# Passing fractional negative value
int_val = int(-17 / 4);
print"Integer value isint_val\n";

输出

Integer value is 4
Integer value is -4