Re: Negative zero? There's gotta be a sprintf that undoes that, right?

printf a sprintf'ed number:

for ( -0.1, -0.01, -0.001, -0.0001, -10 ) {
    printf "%s --> %0.1f\n", $_, sprintf "%0.1f", $_
}
[download]

Comment on Re: Negative zero? There's gotta be a sprintf that undoes that, right? Select or Download Code

Replies are listed 'Best First'.
Re^2: Negative zero? There's gotta be a sprintf that undoes that, right? by duckyd (Hermit) on Dec 12, 2007 at 02:30 UTC
This doesn't work for me, perl 5.8.6 on OS X, however with a little change it does: `for ( -0.1, -0.01, -0.001, -0.0001, -0.00001, -10, ) { my $num = sprintf "%0.1f", $_; $num = abs( $num ) if $num == 0; printf "%s --> %0.1f\n", $_, $num; }` [download]	[reply] [d/l]