从一个遗留的Perl CGI脚本:

# This is convoluted and evil, sorry.

一个承包商在申请一家英国银行。

// i don't know how this works but it does so i'll leave it here anyway

他还增加了BNP(英国极右翼政党)作为测试的虚拟客户之一…我们的顶头上司是亚裔。

//MailBody builders for two outgoing messages
StringBuilder hanz = new StringBuilder();
StringBuilder franz = new StringBuilder();

当我读到这篇文章时，我仍然会笑出声来……

/////////////////////////////////////// this is a well commented line

从一个遗留的Perl CGI脚本:

# This is convoluted and evil, sorry.

/* Emits a 7-Hz tone for 10 seconds.
  True story: 7 Hz is the resonant frequency of a
  chicken's skull cavity. This was determined
  empirically in Australia, where a new factory
  generating 7-Hz tones was located too close to a
  chicken ranch: When the factory started up, all the
  chickens died.
  Your PC may not be able to emit a 7-Hz tone. */

main()
{
    sound(7);
    delay(10000);
    nosound();
}

(Turbo C 2.0版本参考指南中的声音功能)