$_ = 1298.844667;
my $clem = sprintf("%.7g", $_); 
print "$clem\n";

##</code><code>##

1298.845