$ perl -le 'print "ok" if 1.4142135623731 eq 1.4142135623730951;'
ok
$ perl -le 'print "ok" if 1.4142135623731 != 1.4142135623730951;'
ok