在你看来，你遇到过的最令人惊讶、最怪异、最奇怪或最“WTF”的语言特性是什么?
请每个回答只回答一个特征。
当前回答
Perl
my %h1 = map { $_ => 1 } qw/foo bar baz/; // construct an 'is_member' type lookup table
my %h2 = map { "$_" => 1 } qw/foo bar baz/;
第二行是一个语法错误，即使对一个有经验的perl程序员来说，它看起来是一样的。perl的缺点是总是试图做你想做的，而不是你说的。
其他回答
NSIS (Nullsoft Scriptable安装系统)有StrCmp指令:
StrCmp str1 str2 jump_if_equal [jump_if_not_equal] 比较str1和str2(不区分大小写)。如果str1和str2相等，则Gotos jump_if_equal，否则Gotos jump_if_not_equal。 StrCmp $0“一个字符串”0 +3 DetailPrint '$$0 == "a string"' 转到+ 2 DetailPrint '$$0 != "a string"'
锦上添花:jump_if_equal和jump_if_not_equal也可以是负数。但我猜你们已经从正数前面的+符号中算出来了。我不记得这是强制性的，还是只是一个可怕的惯例。
这基本上结合了最差的BASIC和最差的Assembler。
Perl的CORE::开放和标准库具有面向对象的元素，用一个过程性接口掩盖: Open (my $fh， '>'， 'foobar'); Open是一个构造函数，对my()返回的引用进行操作，并接受参数'>'和'foobar'。此外，这是一个受祝福的typeglob对象(意味着它不能在对象内部保存状态)。
关于我的perlmonks post IO::File vs CORE::的更多信息，请在这里打开:http://www.perlmonks.org/?node_id=763565
在FoxPro中，如果我没记错的话，每个命令都可以缩写为4个字符，其他的都被忽略，所以READ, READY, READINESS都是一样的——前4个字符之后的都被忽略。向我解释的人喜欢这个功能，但我觉得它很恐怖。
在C语言中，数组可以像这样被索引:
a[10]
这很常见。
然而，鲜为人知的形式(真正有效!)是:
10[a]
这与上面的意思相同。
X = X + 1
当我还是初学者的时候，这很难消化，而现在函数式语言不使用它了，这就更难了!
如果你不明白这有多奇怪:把等号看作断言语句，而不是赋值操作，就像你在基础代数中经常做的那样，那么这相当于说“0 = 1”。
