在你看来，你遇到过的最令人惊讶、最怪异、最奇怪或最“WTF”的语言特性是什么?
请每个回答只回答一个特征。
当前回答
在Forth中，任何不包含空格的东西都可以是标识符(包含空格的东西需要做一些工作)。解析器首先检查事物是否定义了，在这种情况下，它被称为单词，如果没有，则检查它是否为数字。没有关键字。
无论如何，这意味着人们可以重新定义一个数字来表示其他东西:
: 0 1 ;
它创建了单词0，由1组成，不管它在执行时是什么。反过来，它会导致以下结果:
0 0 + .
2 Ok
另一方面，定义可以接管解析器本身——这是可以做到的 通过评论词。这意味着Forth程序实际上可以在中途变成一个完全不同语言的程序。事实上，这是Forth推荐的编程方式:首先你写你想要解决问题的语言，然后你解决问题。
其他回答
JCL条件返回执行。
//STEP02 EXEC PGM=PROG02,COND=(4,GT,STEP01) .
该特性允许您根据前面步骤的返回代码运行或不运行某个步骤。真是个不错的功能。
除了一些小功能，把逻辑颠倒过来。
首先，如果条件为真，则不运行步骤。
其次，4 GT,STEP01实际上意味着“如果STEP01的返回码大于4”
因此，整个过程意味着“如果来自STEP01的返回代码大于4，则不要运行此步骤”。这与“如果4大于来自STEP01的返回代码，则运行步骤”的简单解释几乎相同，但并不完全相同。
考虑到你唯一认真看待这些事情的时间是凌晨2点30分左右，电话另一端是一个疯狂的夜班接线员，这种双重模糊会导致严重的头痛。
VBScript的With block:
With xml.appendChild(xml.createElement("category"))
.setAttribute("id",id)
.setAttribute("keywords",keywords)
With .appendChild(xml.createElement("item"))
.setAttribute("count",count)
.setAttribute("tip",tip)
.appendChild(xml.createTextNode(text))
End With
End With
foo是什么数据类型?
SELECT TOP 1
NULL AS foo
INTO
dbo.bar
FROM
sys.columns --trivial
为什么所有东西都归零?
SELECT CAST('' AS int), CAST('' AS datetime), CAST('' AS float)
.．.除了这
SELECT CAST('' AS decimal)
我肯定会给Perl提供多个可怕的例子:
if(!$#var)
or
if($mystring =~ m/(\d+)/) {
Perl的$[(已弃用)，这在之前关于通用Perl变量的另一篇文章中提到过，但它值得特别提到，并有更好的解释。对$[的更改仅限于当前范围。更多的信息以及如何使用它的含义;)可以在$[中找到，请访问http://www.perlmonks.org/index.pl/?node_id=480333
