在Perl中刪除數組元素的「正確」方法是什麼？

Question

我有一個包含一組元素的數組。元素的順序是不相關的 - 我使用一個數組，因爲它是我在Perl中知道的最簡單的數據結構。

my @arr = ... 
while (some condition) { 
    # iterate over @arr and remove all elements which meet some criteria 
    # (which depends on $i) 
} 

我知道splice()，但我認爲迭代時使用它並不好。數組元素的delete似乎不推薦使用。也許在@arr本身上使用grep（@arr = grep {...} @arr）？

這裏的最佳做法是什麼？

也許使用散列（雖然我真的不需要它）？

Answer 1

你用grep的想法是好的

@arr = grep { cond($i++); } @arr; 

Answer 2

根據文檔，在數組值上調用delete已被棄用，並可能在未來版本的Perl中被刪除。

或者，你可以建立索引所需的列表和切片分配給原始數組：

@arr = @arr[ @indices ]; 

您可以在perldata閱讀更多關於切片。