Open Source Web Development Tutorials - Dev Shed

Perl入門：条件文
（2009/02/25公開）

Whileループ

　Whileループは、与えた条件が偽の間ループする。

#!/usr/bin/perl

$count= 1

while ($count<10)
{
print "$countn";
$count++;
}

　上のコードは、前のコードと同じように1～9の数字を出力し、値が10に達して、この文が偽になると停止する。

Foreachもある！

　最後のループはForeachループで、通常は配列とともに使用する。

#!/usr/bin/perl

@breakfast = ("Sausage", "Eggs", "Bacon", "Grits", "Toast" "Hash");

print "My breakfast:nn";

foreach $breakfast (@breakfast)
{
print "$breakfastn";
}

　このコードは、配列内の値にアクセスして、それを1つずつ出力する。

Sausage
Eggs
Bacon
Grits
Toast
Hash

　これでループと条件についてはおしまいだ。次のチュートリアルでは、さらにいくつかの文（ステートメント）を取り上げる。次回は、ファイルについて、その作成、読み取り、書き込み、命名などの方法を学ぶことにしよう。

　若きプログラマーの卵よ、行きてPerlの知恵を用い、偉大なことを成せ。じゃあ、また次回に...