Perl foreach loop ใช้เพื่อวนซ้ำค่าของรายการหรือตัวแปรคอลเลกชัน ไวยากรณ์ รูปแบบไวยากรณ์เป็นดังนี้: foreach var (รายการ) {...} แผนภูมิการไหล ตัวอย่าง #!/usr/bin/perl @list = ( 2 , 12 , 36 , 42 , 51 ) ; # ดำเนินการ foreach วนซ้ำ foreach $ก ( @รายการ ) { พิมพ์ " ค่าของ a คือ: $ a \n " } เมื่อรันโปรแกรมข้างต้น ผลลัพธ์ที่ได้คือ: ค่าของคือ: 2a ค่าคือ: 12a ค่าของ 36a คือ: 42a ค่าของคือ: 51
