删除数组元素

Question

如何从Perl数组中删除元素ref？我有它的索引，我不想将元素设置为undef，但要完全删除它。

例如，如何将$a = [1, 2, 3];更改为$a = [1, 3];。

Answer 1

使用splice()：

splice @$a, 1, 1; 

Answer 2

使用splice：

my @array = (44,55,66); 
splice @array, 1, 1; # 55 
@array; # (44,66) 

my $array_ref = [44,55,66]; 
splice @{ $array_ref }, 1, 1; # 55 
$array_ref; # (44,66) 

我注意到，你都搞不清数据类型和引用，因为杰韦利:: REPL显示它们只在参考形式。你在问题中定义了一个数组引用，而不是数组。比较我的代码示例。