Perl。

输出“Foo\n”除非$ Foo;

在PHP中

var_export('false' == 0);       // true

var_export('false' == true);    // true

var_export('false' == false);   // false

EDIT

正如@Kobi提到的，这可能发生，因为语言将任何值解释为“TRUE”，除了“FALSE”，但在PHP中不是这样，在那里事情比你想象的更奇怪!

这个案例在PHP手册的“字符串转换到数字”一章中有完整的记录，它说:

如果字符串以valid开头 数值数据，这就是值 使用。否则，该值为0 (零)。

这里有一个例子:

print (int) 'zero';    // 0
print (int) 'false';   // 0
// but
print (int) '1 - one'; // 1

附注:我认为这种隐式类型转换弊大于利。

Ruby

时间。Parse经常假装解析没有失败，而是返回现在

require 'time'

Time.parse '2000-01-01 12:00:00'
# -> 2000-01-01 12:00:00 +0100

Time.parse '2000-99-01 00:00:00'
# -> ArgumentError: argument out of range ...

Time.parse 'now'
# -> 2010-08-13 21:26:13 +0200

Time.parse 'yesterday'
# -> 2010-08-13 21:26:18 +0200

Time.parse 'billion years ago'
# -> 2010-08-13 21:26:37 +0200

腮腺炎。WTF有很多特性，我选了一个if语句。(请注意，我在下面使用了一种相当冗长的编码风格，以适应那些不懂这门语言的人;真正的腮腺炎代码通常对外行来说更难以理解。)

if x>10 do myTag(x)    ; in MUMPS "tag" means procedure/function
else  do otherTag(x)

这类似于Java中的说法:

if (x > 10) {
  myMethod(x);
} else {
  otherMethod(x);
}

除了在MUMPS中，else语句在语法上不是if块的一部分，它是一个单独的语句，通过检查内置变量$TEST来工作。每次执行if语句时，它都会将$TEST设置为if语句的结果。else语句实际上意味着“如果$TEST为假，则执行该行剩余部分，否则跳转到下一行”。

这意味着如果x大于10，因此第一行叫做myTag，并且myTag包含if语句，那么else的行为不取决于它上面一行的if，而是取决于myTag内部的最后一个if !由于这个“特征”，MUMPS编码员通常被教导像这样编写以上代码以确保安全:

if x>10 do myTag(x) if 1
else  do otherTag(x)

第一行末尾的if 1确保在控制进行到下一行之前正确地设置了$TEST。(顺便说一下，这里的间距必须是这样的，在else后面有两个空格，在所有其他地方都有一个空格。间距是奇怪的，但至少一旦你理解了模式，它是非常正交的。)

当今所有语言:

TypeA a = (TypeA)some_operation_returning_TypeB(1,2,3); // TypeB is not inheriting TypeA

在运行时失败，并带有"Cast to TypeA failed exception"-消息(或类似消息)。这告诉我们程序员到底有多懒。他们没有办法产生消息“未能将TypeA的变量‘a’与TypeB的值‘some_operation_returning_TypeB(1,2,3)’赋值”。他. .他们的座右铭是“犯错误的人必须受苦”。

JavaScript是面向对象的，对吧?因此，在文字字符串和数字上运行方法应该是可行的。比如"hello". touppercase()和3.toString()。第二个是语法错误，为什么?因为解析器期望一个数字后面跟一个点是一个浮点字面值。这不是WTF, WTF是你只需要再加一个点就可以了:

3..toString()

原因是字面上的3。被解释为3.0,3.0. tostring()工作正常。