arrays - 从数组中删除项目并在之后折叠它

Question

使用 Perl，我有一个 IP 地址数组，我存储在一个数组中。对数组中的元素进行了许多操作，其中之一是删除 IP 地址。我知道我可以使用该delete函数，但这会在数组中留下一个空白点。是否有一种功能/方法可以从数组中删除一个项目并折叠/移动元素，以便没有空点。

例如，假设数组中有 10 个元素。我们删除第三个元素。然后只有 9 个元素，第 4 个元素变成第 3 个元素，第 5 个元素变成第 4 个元素，依此类推。

感谢您的帮助！

Answer 1

假设我们有一个 10 元素数组：

my @arr = (0..9);

然后我们要删除元素 3，或偏移量 2：

my $third_element = splice @arr, 2, 1;

@arr现在将是 0、1、3、4、5、6、7、8、9。

Answer 2

地图！这是我最喜欢的 perl 函数之一。

my @out = map { 
$_ #some logic ? $_ : (); #<-- this is your reference variable do stuff here
} @in;