perl -w -MMath::BigFloat -mMath::NumberCruncher