続きは・・・
関数：foreachループを実行する
foreach文を使って、繰り返して処理を実行することができます。foreachループは、以下のような構文で記述します。
foreach ループ変数 (リスト) {
処理；
}
ループは、リストの要素を先頭から各要素が最後まで処理されるまで実行されます。配列の要素を順に処理する際に使用されます。
ループ変数は、省略して$_と書くこともできます。繰り返し処理には、ほかにも、for文やwhile文などもあります。
プログラム例では、例１では、foreachによって、0から9までを順番に表示しています。例２では、Hello Perl Programming World.と各単語ごとに順番に表示しています。
プログラム 例
#!/usr/bin/perl
print "例１ : foreachループを実行します。" , "\n";
foreach my $i (0 .. 9) {
print "i=" , $i , "回目の繰り返しです。" , "\n"
}
print "例２ : foreachループを実行します。" , "\n";
@list = ("Hello" , "Perl" , "Programming" , "Wolrd." );
foreach my $word (@list) {
print $word , " "
}
print "\n"
例の実行結果
[it-engineer@home1 perl]# perl 20070522-2.pl
例１ : foreachループを実行します。
i=0回目の繰り返しです。
i=1回目の繰り返しです。
i=2回目の繰り返しです。
i=3回目の繰り返しです。
i=4回目の繰り返しです。
i=5回目の繰り返しです。
i=6回目の繰り返しです。
i=7回目の繰り返しです。
i=8回目の繰り返しです。
i=9回目の繰り返しです。
例２ : foreachループを実行します。
Hello Perl Programming Wolrd.
[it-engineer@home1 perl]#
