C:\>perl -le "print 'WTF' if 1.00000000000000 != sqrt(3);"
WTF