คำสั่ง while
เป็นคำสั่งสร้างเงื่อนไขให้ทำงานวนรอบซ้ำๆกัน
จนกว่าตัวแปรที่กำหนดจะมีค่าครบตามเงื่อนไข
while
จะนำเอาเรื่องของการกำหนดค่าให้กับตัวแปรหรือ Assignment Operators
เข้ามาเกี่ยวข้องด้วย
ถ้ายังจำกันได้ การ Assignment
ค่าให้กับ Operators
ก็คือการสร้างเงื่อนไขและกำหนดค่าให้กับตัวแปรเป็นค่าต่างๆ
จนครบที่กำหนด
ถ้าจะพูดให้เห็นชัดลองนึกถึงการนับเลข
หรือการให้คะแนน ถ้าถูกต้อง
จะมีค่าเท่ากับ 1 และเพิ่มค่าให้ 1 คะแนน
ให้ดูจากภาพจะเข้าใจมากยิ่งขึ้น
รูปแบบคำสั่ง
กำหนดค่าตัวแปรเริ่มต้น(Assignment Operators) while ( เหตุการณ์ Operator เหตุการณ์ ){ งานที่จะต้องทำ}
|
ตัวอย่างคำสั่ง ที่ 1
while1.pl
#!/usr/bin/perl
print "Content-type: text/html\n\n";
$i = 1;
while ($i <= 10) {
print $i++;
}
|
ผลลัพธ์
คำอธิบาย
กำหนดให้ $a
มีค่าเท่ากับ 1
จากนั้นสร้างเงื่อนไขว่าให้
$a มีค่าน้อยกว่าหรือเท่ากับ10 ลงมา
และให้พิมพ์ค่า
$a คือ 1 - 10
ตัวอย่างคำสั่ง ที่ 2
while2.pl
#!/usr/bin/perl
print "Content-type: text/html\n\n";
$i = 1;
while ($i <= 6){
print "<h$i>Hi
hello</h$i><br>";
$i++;
}
|
ผลลัพธ์
Hi hello
Hi hello
Hi hello
Hi hello
Hi hello
Hi hello
|
คำอธิบาย
กำหนดให้ $i
มีค่าเท่ากับ 1
จากนั้นสร้างเงื่อนไขว่าให้
$1 มีค่าน้อยกว่าหรือเท่ากับ6 ลงมา
และให้พิมพ์คำว่า
Hi hello ด้วยตัวอักษรขนาด 6 ลง ถึง 1
Copy right Passkorn Roungrong 2000 |