Ok, maybe thats what I don't know how to do. I tried the following pre-division:

$numerator->precision(999999999999999999999999999999999999999999999999
+99999999999999999999999999999999999
9999999999999999999999999999999999999999999999999999999999999999999999
+99999999999999999999999999999999999999999999999999999);
$denominator->precision(9999999999999999999999999999999999999999999999
+99999999999999999999999999999999999
9999999999999999999999999999999999999999999999999999999999999999999999
+9999999999999999999999999999999999999999999999999999999);
[download]

After which the values for numerator and denominator = 0. I tried to set the global precision to this as well, and seemingly everything becomes a NaN. I'm using Perl 5.8 btw, I dunno if that helps.

Thanks,

bW