Perlで配列の要素の一部削除ってあったっけ