La Web del Programador: Comunidad de Programadores
 
    Pregunta:  8626 - DECIMALES EN PERL
Autor:  antonio fernandez
Me gustaría saber si hay alguna función en Perl para quedarme con la parte decimal de un número,
lo mismo que esta la función int para coger la parte entera.

Todo esto es para redindear un numero con decimales, ya sabeis si los decimales son igual o mayores
de 50 se suma uno a la parte entera sino se deja como esta.

Gracias.

  Respuesta:  Alex Barbosa
Para este caso en particular el truco es sumar 0.5 a tu cantidad y despues usar int.

int ( 6.3 + 0,5 ) es 6.0
int ( 6.6 + 0,5 ) es 7.0

AB

  Respuesta:  Gabriel Garcia
Si tenés la variable a=3,45 podés hacer lo siguiente.

decimales = a - int(a)
decimales = 3.45 - 3 = 0,45

y Listo.

Espero haberte servido de ayuda.