foreach วน loop

วนลูบ foreach

foreach เป็นคำสั่งวนลูบที่ทำงานร่วมกับตัวแปร Array โดยจะต้องกำหนดตัวแปร Array ขึ้นมาก่อนดังเช่น

@car = ("toyota","nissan","misubishi","isuzu");

foreach จะทำการแบ่งชุดตัวแปร @car เป็นตัว ๆ

รูปแบบคำสั่ง

กำหนดตัวแปร Array

foreach ตัวแปร scalar ( ตัวแปร Array )

{ งานที่จะต้องทำ}

ตัวอย่าง

foreach.pl

#!/usr/bin/perl
print "Content-type: text/html\n\n";

@car = ("toyota","nissan","misubishi","isuzu");

foreach $allcar (@car)

                          {
                              print "$allcar<br>\n";
                                                                 }

ผลลัพธ์

toyota
nissan
misubisi
isuzu

คำอธิบาย

กำหนดให้ @car มีค่าเท่ากับ toyota nissan misubishi isuzu

foreach ก็จะแยกชุดตัวแปร @car และเก็บไว้ใน $allcar

จากนั้นให้พิมพ์ $allcar ออกมาทีละบรรทัด

Copy right Passkorn Roungrong 2000