※ 引述《drive55555 (蛇咬)》之銘言：
: 我去看了，可是在照我還是不太懂，
: 用my這個關鍵字來定義你自己所需要的區域變數??
: 這是什麼意思？
: 可以幫忙解釋一下嗎？謝謝！

首先我假設你對程式的結構有基本概念
起碼我相信你知道副程式 (或自訂函式) 是什麼

所謂的區域變數
指的是在某特定區塊內
才可以被程式存取的變數
所謂的區塊 (block)
通常是以一個副程式為作為單位
說的更通俗點就是在{與}之間
因此當然也可以是一個迴圈內
使用區域變數的目的
在於減少程式出錯的機會
提高程式可讀性
並使程式方便維護
就如同一個公司各部門都可以有同樣的器材
但是上面都會標記屬於哪個部門一樣意思
這樣彼此就不會搞混
程式中也是如此
不同的副程式中有同樣名稱的變數但不會彼此混淆
↑尤其常常有許多副程式都在處理相同資料的時候...
最容易有使用的變數名稱都相同的情況
自然程式的可讀性跟維護性就大大提高了
這也是寫程式基本的小技巧

my的語法有以下幾種寫法：

my $var;
my ($var1, $var2, $var3);
my @array;
my ($var, @array, %hash);

甚至

foreach my $z (@array) { # $z只在foreach回圈中可存取
do anything...
}

for (my $i; $i<=10; $i++) { # $i只在for迴圈中可存取
do something...
}

while (my $x > 0) { # $x只在while迴圈中可存取
do allthing...
}

習慣上附程式開頭都會宣告該副程式內的區域變數
例如說：

my $myvar = 1; # 在整個程式內都可以被存取，因為主程式本身就是一個大區塊
# 另外就所自己所知與經驗，my宣告的變數無法跨檔案
# 因為程式所在的檔案本身也算一個區塊
# 要宣告跨檔案全域變數請用our
# 但如果副程式內有相同名稱的區域變數，則區域變數優先
print '全域變數值=', $myvar;

sub mysub {
my $myvar = 2; # 在這邊$myvar是區域變數
# 因此存取時優先於全域變數$myvar
print '區域變數值1=', $myvar;
}

mysub();

sub mysub2 {
my $myvar = 3;
print '區域變數值2=', $myvar;
}

mysub2();

print '全域變數值2=',$myvar;

結果就如你所想

全域變數值=1
區域變數值1=2
區域變數值2=3
全域變數值=1

彼此互不相干
在sub外的$myvar就如同是公用白板
每個人都可以寫入抹除
mysub()內的$myvar就如同私人辦公桌上的白板
只有座位上的人可以抹寫
因此如果有一個程式必須在很多副程式內處理類似資料
自然就會有變數名稱相似甚至相同的問題
如果不使用my宣告各副程式的區域變數
而共用一開始宣告的全域變數
很容易發生無法預料的後果

不知道這樣說你有比較了解嗎?
或許解釋的不是很好
畢竟我不是科班出身
perl也是自修的
有錯誤疏漏的地方也還請各位板友指教

--
TEAM SENNHEISER
TEAM STAX
TEAM PHILIPS

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 60.244.41.15
※ 編輯: johnnycgi 來自: 60.244.41.15 (09/11 07:37)
※ 編輯: johnnycgi 來自: 60.244.41.15 (09/13 12:57)