my $y = 40.88050;
$y = sprintf "%.3f", $y;
my $x = 41.78050;
$x = sprintf "%.3f", $x;
print "$y \n $x\n";

##</code><code>##

40.880
41.781

##</code><code>##

40.881
41.780