my $x = 12.3456789; $x = int($x*100)/100;