※ 引述《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)