AW: linux-l: runden in Perl

[Steffen Dettmer]

* Steffen Dettmer wrote on Thu, Nov 16, 2000 at 11:09 +0100:
> * Heinz W. Pahlke wrote on Thu, Nov 16, 2000 at 09:51 +0100:
> > Aber: $ perl -e '$wert = sprintf("%.2f\n", 2.445); print $wert';
> > 2.44
> 
> dx:/tmp # perl -e '$wert = sprintf("%.2f\n", 0.245); print $wert';
> 0.24
> dx:/tmp # perl -e '$wert = sprintf("%.2f\n", 0.255); print $wert';
> 0.26

selbiges beim bash-buildin printf:

dx:~ # printf '%.2f\n' 0.245
0.24
dx:~ # printf '%.2f\n' 0.255
0.26

Vielleicht bug inner LIBC?

steffen at dx:~/work > cat test.c
#include <stdio.h>

int main()
{
    printf("%.2f\n", 0.245);
    printf("%.2f\n", 0.255);
    return 0;
}

steffen at dx:~/work > gcc -Wall test.c -o testc
steffen at dx:~/work > ./testc
0.24
0.26


(Bin ich froh, daß Perl nicht "Schuld" ist :) )

Zur Info:
steffen at dx:~/work > rpm -qa|grep libc
libc-2.1.3-141

Was habt ihr so raus?
 
oki,

Steffen

-- 
Dieses Schreiben wurde maschinell erstellt,
es trägt daher weder Unterschrift noch Siegel.