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

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

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.