2000年Perl Journal's obfusated Perl Contest的最佳参赛作品:

#:: ::-| ::-| .-. :||-:: 0-| .-| ::||-| .:|-. :||
open(Q,$0);while(<Q>){if(/^#(.*)$/){for(split('-',$1)){$q=0;for(split){s/\|
/:.:/xg;s/:/../g;$Q=$_?length:$_;$q+=$q?$Q:$Q*20;}print chr($q);}}}print"\n";
#.: ::||-| .||-| :|||-| ::||-| ||-:: :|||-| .:|

代码由作者在http://mysite.verizon.net/les.peters/id2.html详细解释

在Common Lisp中，零维数组是很奇怪的，而且很自然地，它们具有读取语法。

? (aref #0A5)
5

学习PowerShell时发现:

试着猜一下结果数组是什么样的:

$a = 1, 2
$b = 1, 2+3
$c = 1, 2*3

答案:

1, 2
1, 2, 3
1, 2, 1, 2, 1, 2

哎哟!它动摇了我对PowerShell及其开发人员的信心。

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)。

PL/SQL允许将变量和函数名声明为关键字。下面是可编译的PL/SQL:

create or replace 
  function function 
  return number  as
  return number;
begin 
  function.return := 4;
  return   return;
end function;
/

这创建了一个名为function的函数。后:

SQL> select function from dual;

  FUNCTION
----------
         4

大约20年前，当我最后一次涉足腮腺炎时，实现有一些奇怪的局限性。当主机MUMPS变得越来越流行时，MUMPS传统上是一种自托管语言:计算机语言、操作系统和数据库在一个包中。

腮腺炎主要是关于它的数据库。本质上，这是一个巨大的多维哈希表，由B*树支持，可以快速访问。语言和数据库之间也没有任何障碍:如果您想在那里存储一些东西，只需在变量前面加上一个符号，表明它将被持久化到备份存储中。

另一方面，文件系统几乎不存在，对它的支持就更少了。我们唯一能做的就是把一个程序从文件中加载到内存中，然后把内存中的内容发送回文件。最好在加载前清空缓冲区，否则它会和之前的东西混在一起。

因此，考虑到它的自托管性质和极其恶劣的文件系统，人们可能会想知道这些程序是如何编辑的。事实上，编辑器是用MUMPS本身编写的——那么，编辑器如何在不重写自己的情况下将程序存储在内存中呢?

好吧，诀窍在于能够以源代码的形式执行变量的内容。然后，编辑器将自己加载到变量中，在变量中执行自己，清除内存，然后在内存中加载、保存和编辑文件，一直从变量中执行。

除此之外，所有命令都可以被缩短为它们的第一个字母(除了Z命令，缩短为两个字母，主要处理文件系统)，还有一个奇怪的事实，比如IF (I)设置了一个变量，然后由ELSE (E)查询——当然，可以被任何介入的I或程序本身覆盖。转念一想，我觉得整个语言就是个垃圾。然而，它有一种奇怪的吸引力。