配列を操作してて、「ある条件のばあい、その要素を削除」みたいなことをしたい場合。良くやるのが、 sub remove_item_in_some_condition { my (@input) = @_; my @result = (); for my $item ( @input ) { push @result, $item if( !some_condition($item) …