Perl的CORE::开放和标准库具有面向对象的元素，用一个过程性接口掩盖: Open (my $fh， '>'， 'foobar'); Open是一个构造函数，对my()返回的引用进行操作，并接受参数'>'和'foobar'。此外，这是一个受祝福的typeglob对象(意味着它不能在对象内部保存状态)。

关于我的perlmonks post IO::File vs CORE::的更多信息，请在这里打开:http://www.perlmonks.org/?node_id=763565

早期的FORTRAN，空格不重要。(anti-Python !)

DO 20 I = 1, 10

含义:从这里循环到第20行，I从1到10。

DO 20 I = 1. 10

含义:将1.10分配给名为DO20I的变量。

有传言说这个漏洞毁了一个太空探测器。

腮腺炎。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后面有两个空格，在所有其他地方都有一个空格。间距是奇怪的，但至少一旦你理解了模式，它是非常正交的。)

Perl的sub没有真正的参数列表，只有@_数组。同时，sub会自动变平传入的参数。

我不明白为什么这是一个持久的功能;这反映了几年前我不得不在TI-86 BASIC上做的事情，因为这门语言没有足够的特色。

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);
}

Python的三元操作符

在Python中，C三元操作符(c++示例:bool isNegative = i < 0 ?True: false;)可用作语法糖:

>>> i = 1
>>> "It is positive" if i >= 0 else "It is negative!"
'It is positive'
>>> i = -1
>>> "It is positive" if i >= 0 else "It is negative!"
'It is negative!'

这并不奇怪，而是一种特征。奇怪的是，与C中的顺序(条件?答:b)。