Perl充满了奇怪但整洁的特性。

If可以用在语句之前或之后，就像这样:

print "Hello World" if $a > 1;    
if ($a > 1) { print "Hello World"; }

foreach也是如此:

print "Hello $_!\n" foreach qw(world Dolly nurse);

哈哈！

整个语言本身。虽然不完全是WTF的事情，但我从来没有遇到过一种语言在我的脑海中以一种刺耳的卡通声音播放。我以前也从来没有看过代码并想要惊呼“啊啊啊啊可爱!”

这个程序显示数字1-10并终止

HAI
CAN HAS STDIO?
IM IN YR LOOP UPPIN YR VAR TIL BOTHSAEM VAR AN 10
    VISIBLE SUM OF VAR AN 1
IM OUTTA YR LOOP
KTHXBYE

在Java中

byte b = 0;
b++;

等于

byte b = 0;
b = b + 1;

但事实并非如此。实际上，你会得到一个编译器错误，因为加法的结果是int类型的，因此不能赋值给字节变量b。当使用复合运算符时，编译器会自动在这里插入一个类型转换。所以

b++;

就变成了

b = (byte) b + 1;

在我看来，在c#中能够将超出范围的整数转换为枚举是非常奇怪的。想象一下这个枚举:

enum Colour
{
    Red = 1,
    Green = 2,
    Blue = 3
}

现在，如果你写:

Colour eco;
eco = (Colour)17;

编译器认为这很好。还有运行时。

请看这里了解更多细节。

下面是Perl调试器中的一些混乱:

  DB<1> sub foo { +(1..20) } 
  DB<2> @bar = foo(); # list of 1, 2, 3, 4...20
  DB<3> x scalar @bar # size of list
0  20
  DB<4> x scalar foo();
0  ''

这是正确的。当您像这样调用方法时，标量上下文从标量向下传播到子例程调用，将看起来无害的..变成一个完全不同的运营商。(这是“触发器”操作符，而不是范围操作符)。

我一直是PHP错误的忠实粉丝，当在一行中使用两个冒号时脱离上下文:

解析错误:语法错误，第3行/path/to/file/error.php中的T_PAAMAYIM_NEKUDOTAYIM异常

第一次遇到这种情况时，我完全被弄糊涂了。