perlのpush関数の使い方

Perlでpush関数は、配列の末尾に1つ以上の値を追加するために使用されます。その構文は次のとおりです。

配列に値を追加する: push @array, value1, value2, …;

@arrayにvalue1、value2などを追加する場合は、@arrayに値を追加する配列変数、value1、value2は配列に追加される値です。

push関数を使用する例を以下に示します：

my @fruits = ("apple", "banana", "orange");
push @fruits, "grape", "kiwi";
print "@fruits\n";

結果は出力に表示されます。

りんご バナナ オレンジ ぶどう キウイ

サンプルでは、まず3つの果物を含む配列@fruitsを作成しています。次に、push関数を使って2つの新しい果物（”grape”と”kiwi”）を配列の最後に追加します。最後に、print文を使って配列全体を出力すると、すべての果物のリストが出力されます。

注：push 関数はもう一つの配列をパラメータとして受け付けることができ、これによってもう一つの配列のすべての要素が目標配列の末尾に追加されます。例：

my @fruits = ("apple", "banana", "orange");
my @newFruits = ("grape", "kiwi");
push @fruits, @newFruits;
print "@fruits\n";

出力結果は同じです。

りんご、バナナ、オレンジ、ぶどう、キウイ

ここで、2つの新水果を含む新しい配列 @newFruits を作成しました。 次に、push 関数を使用して、@newFruits 配列のすべての要素を @fruits 配列の末尾に追加します。 最後に、@fruits 配列の全体を出力します。