Perl 網頁程式設計課程目錄

Perl Foreach 使用(二)

在上一節介紹Foreach如何使用,大家都可能留意到,我們只處理一個單量陣列.

其實,處理多個陣列也是非常容易的,技巧和前一節也差不多.請參考以下例子:

編寫及在瀏覽器執行以下 Perl 程式 :

#!/usr/bin/perl
print "Content-type: text/html\n\n";
#
### Set Scalar Array ########
#
@family=("Kong","Wai","Keung","Yau");
#
@password=(123, 876, 984, 567);
#
#
### Test Elements #######
#
$x=0;
#
foreach (@family) {
  print "Password of $family[$x] is $password[$x]";
  print "<BR>";
  $x=$x+1;
}

讀 者 應 可 自 行 理 解 這 Perl 例 子 的 內 容.

瀏覽器應出現 :

Password of Kong is 123
Password of Wai is 876
Password of Keung is 984
Password of Yau is 567

實 例 View Example