use Math::BigFloat (); $x = Math::BigFloat->new("15000000") / 222; print("$x\n"); # 67567.56756756756756756756756756756756757 $x = Math::BigFloat->new("67567.57") * 222; print("$x\n"); # 15000000.54