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的缺点是总是试图做你想做的，而不是你说的。

c#中的“动态”。

因为智能感知、类型安全和决定论会随着“动态”关键字的第一次使用而立即消失，因此所有必须与RAD或python受害者一起工作的人的日子都被毁了。

我几年前使用的一个Fortran编译器有一个有趣的特性:(A)数字先存储在高字节;(b)数字按地址传递给子程序;(c)没有在编译时检查长度。

所以你可以写一个这样的程序:(如果我把语法弄乱了，请原谅。我已经很久没有写Fortran了。)

INTEGER*2 FUNCTION TIMESTWO (INTEGER*2 N)
RETURN N*2

... THEN CALL THIS SOMEWHERE WITH A LONG INTEGER ...

INTEGER*4 I, J

I=42
J=TIMESTWO(I)

J的最终值是…零!

为什么?因为传入的值是4个字节，但被调用的函数只查看前两个字节。由于前两个是0，它将0乘以2并返回它。然后将此返回值转换回四个字节。

当我第一次遇到它时，它非常神秘。几乎我传递给某些函数的每个数字都被解释为零!

在JavaScript中，看到!!第一次使用A(作为一种转换为布尔值的方式)。

在Visual Basic 7及以上版本中，我发现实现了短路逻辑求值以保持与遗留的Visual Basic <=6代码的兼容性，有点WTF:

而且 （MSDN） OrElse （MSDN）

C的多个名称空间:

typedef int i;

void foo()
{
    struct i {i i;} i;
    i: i.i = 3;
    printf( "%i\n", i.i);
}

或与字符:

typedef char c;

void foo()
{
    struct c {c c;} c;
    c: c.c = 'c';
    printf( "%c\n", c.c);
}