A Number Object for Perl 5