It is no use in simply removing the dot. Probably you mean $amount =~ s/\..+//? int() is faster.
In reply to Re^2: Strange int() result by flowdy in thread Strange int() result by menth0l