Perl可以自动将26进制转换为10进制，如果你能在早上接受自己的话……

$ perl -E "say lc (@a='a'..'asdf')"
30530

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

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

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

foreach也是如此:

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

Perl的CORE::开放和标准库具有面向对象的元素，用一个过程性接口掩盖: Open (my $fh， '>'， 'foobar'); Open是一个构造函数，对my()返回的引用进行操作，并接受参数'>'和'foobar'。此外，这是一个受祝福的typeglob对象(意味着它不能在对象内部保存状态)。

关于我的perlmonks post IO::File vs CORE::的更多信息，请在这里打开:http://www.perlmonks.org/?node_id=763565

引用尼尔·弗雷泽的话(看那一页的末尾)

try {
    return true;
} finally {
    return false;
}

(在Java中，但在JavaScript和Python中行为显然是相同的)。其结果留给读者作为练习。

编辑:只要我们谈到这个问题，也要考虑到这一点:

try {
    throw new AssertionError();
} finally {
    return false;
}

我曾经写过一种编程语言，它有一个“strfry”操作符:

"hello world"?
# => "wdo rlholle"

有用的,是吗?

在x++ (Microsoft Dynamics AX):

1)需要在单独的行上使用分号(;)将变量声明与语句分开(至少在4.0版本之前)

    int i;
    int myArray[5];
    ;
    i = 1;

2)数组索引是基于1的，所以你不允许像in那样使用索引0(零)从数组中读取

    int myArray[5];
    ;
    print myArray[0];    // runtime error

这并不奇怪，但是你可以在赋值的左边使用0索引，比如in

    int myArray[5];
    ;
    myArray[2] = 102;
    myArray[0] = 100;    // this is strange
    print myArray[2];    // expcting 102?

会发生什么呢?数组被初始化为它的默认值，无论赋值中使用了什么值。上面的代码输出0(零)!