in reply to decimal calculation

See:
perldoc -q decimal perldoc perlnumber
Cheers,
Rob