Perlで動的にリストを生成する方法

Perlリストはシーケンス内の項目の集まりです。 リストを作成するには、名前宣言の前に "@"記号を使用する必要があります。 プログラムを実行しながら動的リストを作成するには、それを許可するコードを作成します。 たとえば、開始情報を入力するようにユーザーに要求してから、基準に適合する番号のリストを生成できます。

ユーザープロンプト

動的に作成されたリストの中でユーザーがどのような値を望んでいるかを知るためには、いくつかの情報を要求する必要があります。 最低でも、リストに必要な数字の数と、それらの数字の値の範囲を知っておく必要があります。 "print"関数を使ってユーザーにアイテム数の入力を促し、 "$ num =;"と入力します。 その値を$ num変数に保存します。 次に範囲の入力を求め、「$ range =;」と入力します。 その値を$ range変数に保存します。

ランド関数

"rand"関数は、ある程度の柔軟性を持って乱数を動的に生成します。 デフォルトでは、0から1までの10進数を作成します。 これを "int"関数と組み合わせることで、整数を作成できます。また、範囲値をパラメータとして含めることもできます。 たとえば、ユーザーが入力を求めた範囲として「50」を保存した場合は、「$ random = int(rand($ range + 1));」と入力します。 0から50までの乱数を作成します。ステートメントに "+1"を追加する必要があります。そうしないと、範囲は0から49になります。

プッシュ機能

Perlリストの最後に新しい項目を追加するには、 "push"関数を使います。 それは二つのパラメータを取ります:追加するリストと新しい値です。 たとえば、「push(@list、$ random);」と入力します。 $ random変数に保存されている値をリストに追加します。 別の方法として、配列の先頭に要素を追加するために "unshift"関数を使用することもできますが、動的配列を最初から作成する場合、どちら側に新しい項目を追加するかは重要ではありません。

ループ用

リストを生成するには、 "for"ループを使います。 counter変数については、1から始めて、それが$ num変数と等しくなるまで進めて、1ずつ増やします。 たとえば、ループを作成するには、 "for($ i = 1; $ i <= $ num; $ i ++)"と入力します。 内部では、2行のコードを使用するだけで済みます。rand関数の呼び出しとpush関数の呼び出しです。 ループが完了すると、動的に生成された数のリストができます。

人気の投稿