C:\>perl -le "print sqrt(2);"
1.4142135623731

C:\>perl -le "print 'WTF' unless sqrt(2) == 1.4142135623731;"
WTF