一些早期的动态语言(包括，如果我没记错的话，Perl的早期版本)没有弄清楚什么是好的动态，什么是坏的动态。所以他们中的一些人允许这样做:

1 = 2;

在这句话之后，下列情况是正确的:

if(1 + 1 == 4)

大约在1977年，我在Lisp中添加了“format”函数，那时“printf”甚至还不存在(我是从与Unix相同的源:Multics复制的)。它一开始很无辜，但后来被一个接一个的特征填满了。当Guy Steele引入迭代和相关特性时，事情就失控了，这些特性被Common Lisp X3J13 ANSI标准所接受。下面的示例可以在Common Lisp The Language, 2nd Edition第22.3.3节中的表22-8中找到:

(defun print-xapping (xapping stream depth)
  (declare (ignore depth))
  (format stream
      "~:[{~;[~]~:{~S~:[->~S~;~*~]~:^ ~}~:[~; ~]~ ~{~S->~^ ~}~:[~; ~]~[~*~;->~S~;->~*~]~:[}~;]~]"
      (xectorp xapping)
      (do ((vp (xectorp xapping))
           (sp (finite-part-is-xetp xapping))
           (d (xapping-domain xapping) (cdr d))
           (r (xapping-range xapping) (cdr r))
           (z '() (cons (list (if vp (car r) (car d)) (or vp sp) (car r)) z)))
          ((null d) (reverse z)))
      (and (xapping-domain xapping)
           (or (xapping-exceptions xapping)
           (xapping-infinite xapping)))
      (xapping-exceptions xapping)
      (and (xapping-exceptions xapping)
           (xapping-infinite xapping))
      (ecase (xapping-infinite xapping)
        ((nil) 0)
        (:constant 1)
        (:universal 2))
      (xapping-default xapping)
      (xectorp xapping)))

在Haskell:

let 2 + 2 = 5 in 2 + 2

收益率5。

我有点纠结:

1;

在perl中，模块需要返回true。

JCL条件返回执行。

//STEP02 EXEC PGM=PROG02,COND=(4,GT,STEP01) .

该特性允许您根据前面步骤的返回代码运行或不运行某个步骤。真是个不错的功能。

除了一些小功能，把逻辑颠倒过来。

首先，如果条件为真，则不运行步骤。

其次，4 GT,STEP01实际上意味着“如果STEP01的返回码大于4”

因此，整个过程意味着“如果来自STEP01的返回代码大于4，则不要运行此步骤”。这与“如果4大于来自STEP01的返回代码，则运行步骤”的简单解释几乎相同，但并不完全相同。

考虑到你唯一认真看待这些事情的时间是凌晨2点30分左右，电话另一端是一个疯狂的夜班接线员，这种双重模糊会导致严重的头痛。

COMEFROM是我见过的最奇怪，也可能是最没用的语言功能。

其次是三元运算符，因为它违反了优化的第一条规则。它带来的危害大于它解决的问题。它的危害更大，因为它使代码可读性更差。

并不是一个真正的语言功能，但有趣/很棒的功能使用是Duff的设备。