如何将函数(如拆分)返回的数组转换为数组引用？

Question

考虑以下代码:

@tmp = split(/\s+/, "apple banana cherry");
$aref = \@tmp;

除了不优雅之外,上面的代码很脆弱.说我用这一行跟着它:

@tmp = split(/\s+/, "dumpling eclair fudge");

现在$$aref[1]是"eclair"而不是"香蕉".

我怎样才能避免使用temp变量？

从概念上讲,我正在考虑类似的事情

$aref = \@{split(/\s+/, "apple banana cherry")};

Answer 1

如果你想要一个array-ref,你可以这样做:

my $aref = [ split(/\s+/, "apple banana cherry") ];