Fixed Point arithmetic for Perl