在复制到另一个数组perl之前跳过一个数组元素

Question

这是我的数组。

@resources =（a1，a2，a3，a4，a5）

现在，我想将整个数组复制到另一个数组中，但是它应该跳过存储在$ skip中的元素。

例如，如果$ skip = a3。

然后，新数组应仅包含以下元素：

resourcesleft =（A1，A2，A4，A5）

有人可以让我知道我怎么得到这个吗？

问候，

Chandu

Answer 1

使用grep内置函数

@resourcesleft = grep { $_ ne $skip } @resources;