perl | función int()

La función int() en Perl devuelve la parte entera del valor dado. Devuelve $_ si no se proporciona ningún valor. Tenga en cuenta que $_ es la entrada predeterminada, que es 0 en este caso. La función int() no redondea. Para redondear un valor a un número entero, se usa sprintf.

Sintaxis: int(VAR)

Parámetros:
VAR: valor que se va a convertir en entero

Devoluciones: Devuelve la parte entera de VAR

Ejemplo 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";

Producción:

Integer value is 19
Integer value is -18

Ejemplo 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";

Producción:

Integer value is 4
Integer value is -4