v.bpc     := v.pc;  -- Remember to jump back
v.baccu   := accu;  -- Yo dawg, heard you like runing instructions
                    -- so I took backup of your accu so you can run
                    -- instructions while you run instructions.
v.flags.i := false; -- No more interupts

从一个遗留的Perl CGI脚本:

# This is convoluted and evil, sorry.

这是一个旧的IOCCC获奖条目，我不得不下载整个获奖档案——一个巨大的1.4 M——和grep的几个短语，我记得错了才找到它。

从语法上看，这可能不是注释。或许是这样。我还没想明白。它肯定没有注释分隔符，但也没有字符串分隔符。

C="Lint says "argument Manual isn't used."  What's that
mean?";

没有价格来猜测棉绒的产量。

对于好奇的人来说，这个条目在这里。

// Oh crap, i think i'm gonna yack

随后不久又有:

// TODO: end this lunacy

在20世纪80年代早期的某个时候，我们在PL/I中为公用事业编写财务建模代码。接到一个客户的电话，说代码在评论之后就爆炸了

/* Honest this works */

这家伙用了我们的标准金融方程花了大约15页的代数把一堆代码组合成一个方程。在三里岛事件后，当公用事业公司不得不以巨大的代价注销他们的核电站时，这个方程失败了，因为FIXED BIN 15(整数)溢出，如果代数没有发生，就不会发生这种溢出。

来自一个显然在看巨蟒剧团的小伙子:

> //现在，for something完全 > // different: 类theLarch {