http://www.perlmonks.org?node_id=11154952

rkd257 has asked for the wisdom of the Perl Monks concerning the following question:

I must be using bignum incorrectly, as I would have thought I would end up with 5 and 7 on the bottom 2 lines.

0.5833333333333333333333333333333333333333
5833333333333333333333333333333333333333
10000000000000000000000000000000000000000

use Math::BigRat; use bignum; my $cf = 1 - 1/6 - 1/4; ## $cf = 7/12 + \ + my $n = $cf->numerator(); my $d = $cf->denominator(); print "$cf\n"; print " $n\n"; print " $d\n";