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 enteroDevoluciones: 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