从Array Perl中删除元素

Question

如何从数组中删除匹配的元素？假设我有数组@A [1, 2, 2, 3, 4, 4, 4, 5]，现在我删除了元素2和3，所以我应该只在数组中看到@A [ 1, 4, 4, 4, 5]。

Answer 1

您可以使用grep过滤掉您不想要的元素：

my @A    = (1, 2, 2, 3, 4, 4, 4, 5);
my @newA = grep { $_ != 2 } @A; 
# @newA has elements (1,3,4,4,4,5)