【随手记】perl 标量上下文和列表上下文中的 reverse

reverse 操作符可以对列表或者哈希执行反序计算，在学习小骆驼书的时候，一个随手写的练习程序让我纠结了小一会，其代码如下：

#!/usr/bin/perl
use 5.010;

@numbers = 6..10;
say "numbers: @numbers";
# 代码1
@reversed = reverse @numbers;
say "reversed: @reversed";
# 代码2
say "reversed2: ".(reverse @numbers);

执行这段程序，最后两行代码给出了迷惑的结果：

numbers: 6 7 8 9 10
reversed: 10 9 8 7 6
reversed2: 019876

数组中的元素 “10” 被当成字符串进行反序，输出了 “01”。

这个问题在小骆驼书的后面教程中给出了解释：

在列表上下文中，reverse 很自然地返回逆序后的列表。但是在标量上下文中，reverse 返回逆序后的字符串，其计算的规则是，先将列表中所有的字符串连接到一起，再对结果中的每个字符作逆序处理。

这就不难解释为什么【代码2】给出了预想之外的结果。

---

【正文无关】在小骆驼书中对应的章节里，有一个很有趣的注脚：

在学习的阶段，我也很难想象这个规则是要解决什么应用情形下的问题，但就目前没有造成任何麻烦的情况下看，这个规则确实有点酷