使用数组名称反转数组并引用数组

Question

我已经声明了一个数组，并且对这个数组的引用如下： -

my @array = (1, 2, 3, 4);
my $aref = \@array;

现在，我正在尝试使用数组名称和引用名称来反转数组。

print reverse @array, "\n";
print reverse @{$aref}, "\n";

这样工作正常，并在两种情况下打印反转数组： -

4321
4321

但是，如果我尝试在同一行中打印反向，它会给我一个奇怪的结果： -

print reverse @array, reverse @{$aref}, "\n";

现在，我得到了这个输出： -

1234
4321

如果我在其间添加换行符： -

print reverse @array, "\n", reverse @{$aref}, "\n";

我得到了这个输出： -

1234

4321

因此，您可以看到两个问题： -

• 1st，使用名称
时，数组无法撤消
• 第二，在两个反转阵列之间打印了一条额外的换行符。

我无法理解这种行为，为什么会发生这种情况。我还浏览了函数reverse的文档，以检查是否有任何关于此行为的提及，但我没有用餐。谁能解释一下这里发生了什么？

Answer 1

reverse @digits, reverse @$digits, "\n"

装置

reverse(@digits, reverse(@$digits, "\n"))

你想要

reverse(@digits), reverse(@$digits), "\n"

或只是

reverse(@$digits, @digits), "\n"