A Float Object for Perl 5