Help for this page
Select Code to Download
Select
or
download this
use Test::More tests=>1; my $x = 1.00000001; is sprintf("%.5f", $x), "1.00000";