繰り返し処理

while

繰り返しには以下の構文を使います

while(条件){

実行ブロック

};

例えば以下の命令を実行すると

#!C:/Perl/bin/perl.exe

print "Content-type: text/html\n\n";

$a=0;

while($a<30){
print "<P>",$a,"</P>";
$a++;
};

ブラウザーに0,1...29まで３０個数えてくれます。

戻る