[Perl] imprimir decimales

[Sergi -]

Muchas gracias Gunnar ;-)



 --- Gunnar Wolf <gwolf en gwolf.org> escribió:

> Sergi - dijo [Mon, Nov 21, 2005 at 12:56:24PM
> +0100]:
> > ¿Como hago para imrimir solo 2 decimales del
> resulatdo
> > del calculo de una operación ?
> > 
> > Es que me saca 23343556677 por (ejemplo) donde yo
> solo
> > quiero 233
> 
> Como siempre, hay más de una manera de hacerlo
> (TIMTOWTDI) ;-)
> 
> El mejor rendimiento lo vas a sacar de sprintf o
> printf:
> 
> $var = sprintf('%.2f', $var); # te deja en $var la
> variable truncada
> printf('%.2f', $var); # imprime el valor truncado
> 
> Claro que las expresiones regulares son también una
> manera:
> 
> $var =~ /^(.*\.\d\d)/; # Encuentra el patrón
> especificado
> print $1; # Te lo imprime
> 
> O muchas otras más :)
> 
> Saludos,
> 
> -- 
> Gunnar Wolf - gwolf en gwolf.org - (+52-55)1451-2244 /
> 5623-0154
> PGP key 1024D/8BB527AF 2001-10-23
> Fingerprint: 0C79 D2D1 2C4E 9CE4 5973  F800 D80E
> F35A 8BB5 27AF
> 



		
______________________________________________ 
Renovamos el Correo Yahoo! 
Nuevos servicios, más seguridad 
http://correo.yahoo.es