Perl

[perl] limiter le nombre de chiffre d'un float ?

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [perl] limiter le nombre de chiffre d'un float ?

darkpotpot

:3 muuuuuuuuuuuuuUUUUUUU

Voila, j'aurai besoin de savoir comment faire pour transformer un float de 50 chiffres apres la virgule en un float de 2 chiffres apres la virgule.
Merci

Publicité

Aricoh

gentil mais fo po pousser

darkpotpot a écrit :

Voila, j'aurai besoin de savoir comment faire pour transformer un float de 50 chiffres apres la virgule en un float de 2 chiffres apres la virgule.
Merci

Code :

my $Nombre = 5.22232325656566;
$Nombre = sprintf("%0.2f", $Nombre);

Message édité par Aricoh le 18-04-2003 à 12:30:05

darkpotpot

:3 muuuuuuuuuuuuuUUUUUUU

Merci beaucoup, ca faisait un bon bout de temps que je cherchai

Aricoh

gentil mais fo po pousser

darkpotpot a écrit :

Merci beaucoup, ca faisait un bon bout de temps que je cherchai

perlfunc est ton ami

Aricoh

gentil mais fo po pousser

oups, petite précision en passant : sprintf ne gère pas l'arrondi après la virgule

ainsi, 5.299999999999 deviendra 5.29 et non 5.30

tout dépend de ce que tu voulais avoir à l'arrivée

pospos

autre solution, parfois plus rapide (mais pas toujours): utiliser int:

2 chiffres apres la virgule:
$n = int(100*$n)/100

et si tu veut que ca arrondisse au superieur:
$n = int(100*$n + 0.5)/100

apres tu peux mettre ca dans une fonction:

Code :

sub arrondi(
my $n = shift;
my $precision = shift;
return int((10**$precision)*$n + 0.5) / (10**$precision);
}
arrondi(0.123456789, 2); # -> 0.12

FORUM HardWare.fr

Programmation

Perl

[perl] limiter le nombre de chiffre d'un float ?

Sujets relatifs
perl - protéger un programme contre les plantages ?	[ Perl] cmd sort
PB de path en perl	[PERL] Couleurs à l'affichage
[php ou perl] petite bd dans 1 fichier	chemin vers perl automatique pour fichier exécutable
Installer un module CPAN à active perl sous win 2000	Perl et Access
Arrêt du script Perl	limiter les accès au PC en lançant une application
Plus de sujets relatifs à : [perl] limiter le nombre de chiffre d'un float ?

Page générée en 0.032 secondes