in reply to Decimal Removal
Or this (rounds up for > .5): $int = int $num + $num =~ /\.[5-9]/;
-- John.
$int = sprintf "%d", ( $num + 0.5 ) ; [download]