help float to string

[Marcos Rebelo]

try the sprintf

print sprint("%.02f", $f);

if I'm not rong;



-----Original Message-----
From: [email]perl@swanmail.com[/email] [mailto:perl@swanmail.com]
Sent: Tuesday, October 14, 2003 10:18 AM
To: [email]beginners@perl.org[/email]
Subject: help float to string


Can someone help me with retaining the precisions when they are zero?

ie -

$f = 9.00
$z = $f;
print $z; #result in 9 - bad I want 9.00

$fx = 9.25
$z = $fx;
print $z; #result in 9.25 - good

I can but don't want to use a sub like itoa. Is there a better way to
convert to string?

$z=itoa($f);
print $z #result 9.00
$z=itoa($fx);
print $z #result 9.25

sub itoa { return sprintf("%.2f", $_[0]); }



-----------------------------------------
eMail solutions by
[url]http://www.swanmail.com[/url]

--
To unsubscribe, e-mail: [email]beginners-unsubscribe@perl.org[/email]
For additional commands, e-mail: [email]beginners-help@perl.org[/email]

[perl@swanmail.com]

Can someone help me with retaining the precisions when they are zero?

ie -

$f = 9.00
$z = $f;
print $z; #result in 9 - bad I want 9.00

$fx = 9.25
$z = $fx;
print $z; #result in 9.25 - good

I can but don't want to use a sub like itoa. Is there a better way to
convert to string?

$z=itoa($f);
print $z #result 9.00
$z=itoa($fx);
print $z #result 9.25

sub itoa { return sprintf("%.2f", $_[0]); }



-----------------------------------------
eMail solutions by
[url]http://www.swanmail.com[/url]

[Paul Johnson]

[email]perl@swanmail.com[/email] said:

> Can someone help me with retaining the precisions when they are zero?
>
> ie -
>
> $f = 9.00
> $z = $f;
> print $z; #result in 9 - bad I want 9.00
>
> $fx = 9.25
> $z = $fx;
> print $z; #result in 9.25 - good
>
> I can but don't want to use a sub like itoa.

Why not? Seems like the perfect solution to me.

> Is there a better way to
> convert to string?

That depends on your definition of better.

$ perl -le '$# = "%.2f"; print 9'
9.00

But $# is deprecated, so don't do that.

$ perl -le '$f = "9.00"; $z = $f; print $z'
9.00

> $z=itoa($f);
> print $z #result 9.00
> $z=itoa($fx);
> print $z #result 9.25
>
> sub itoa { return sprintf("%.2f", $_[0]); }

--
Paul Johnson - [email]paul@pjcj.net[/email]
[url]http://www.pjcj.net[/url]