print int('141.32124355465');

__OUTPUT__
141

##</code><code>##

my $num = 141.32124355465;
$num =~ s/\.\d+$//;
print $num;

__OUTPUT__
141