>perl -le "print 'ok' if 9.999999999999999 == 9.999999999999998;" ok