如何在perl的列表中间添加项目

Question

如何在Perl最新版本的列表中间添加项目。如果有任何方法，请帮帮我 例如：

@array=qw(apple mango waterlemon pineapple lemon);
print("@array\n");

这是代码，现在我需要在列表中添加带有索引[3]的项目“ sapota”。我该如何添加

Answer 1

splice是您所需要的。

splice @array, 3, 0, 'sapota';