Perl将值推入多维数组

Question

我创建了一个简单的多维数组：

my @arraytest = ([1, 2, 3],[4, 5, 6],[7, 8, 9]);
print "Array - @$_\n" for @arraytest;

输出：

Array - 1 2 3 
Array - 4 5 6 
Array - 7 8 9

如何将“10,11,12”推送到此数组中的下一个元素？

Answer 1

您需要创建一个数组引用，并将其作为下一个元素。最简单的方法是创建一个匿名数组引用。

push @arraytest, [10, 11, 12];

您的输出现在看起来像这样：

Array - 1 2 3
Array - 4 5 6
Array - 7 8 9
Array - 10 11 12

重要的是，您的@arraytest是一个实际数组（不是参考），因此您可以直接使用push，pop等操作它。

有关详细信息，请参阅perllol。