Perl で配列に要素を挿入/削除する (splice) : もやもやプログラミング

splice を使います。破壊的な関数なので注意しましょう。 use strict; use warnings; my @arr1 = ('zero', 'one', 'two', 'three', 'four'); # @arr1 の2番目のインデックスから0個の要素を削除して要素2を挿入 my @deleted1 = splice(@arr1, 2, 0, 2); print join(', ', @deleted1), "\n"; # 空の配列 print join(', ', @arr1), "\n"; # zero, one, 2, two, three, four 別の配列を挿入することもできます。 use strict; use warnings; my @arr2 = ('zero', 'one', 'two', 'three', 'four'); # @arr2 の2番目

[note103]

わかりやすいサンプルコード集でありがたい

[kiyo_hiko]

「push, pop, shift, unshift などは splice を使って置き換えることができるようです」　うぬぅ…。