$ perl -le '$epsilon = 1e-14; print "Wrong " if abs (19.08 + 2.01 - 21.09) > $epsilon;'

$ perl -le '$epsilon = 1e-14; print "Wrong " if abs (19.08 + 2.02 - 21.09) > $epsilon;'
Wrong