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 is $int_val\n"; 
  
# Passing negative decimal value 
$int_val = int(-18.659); 
print"Integer value is $int_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 is $int_val\n"; 
  
# Passing fractional negative value 
$int_val = int(-17 / 4); 
print"Integer value is $int_val\n";

输出：

Integer value is 4
Integer value is -4

相关用法

注：本文由纯净天空筛选整理自Code_Mech大神的英文原创作品 Perl | int() function。非经特殊声明，原始代码版权归原作者所有，本译文未经允许或授权，请勿转载或复制。