Perl 變數的作用my, our, local和全域變數

perl定義的變數預設是全域
1）my 作用：把變數的名字和值都限於某個範圍內，也就是說，該變數只能本層模組或者函數
可以看到這個變數，高一層或者低一層的都看不到。
2）our 作用：把變數名字限於某個範圍，其實就是明確聲明一個”全域變數”，雖然是在某個
模組或者函數裡面定義，外面的也可以訪問，如果已經聲明過了，再次用our，表示此處用的和之前聲明的our變數
是同一個。
3）local 作用：把值局限於某個範圍，該範圍與my有所區別的是，包含本層及本層的下層，
但本層的上一層不可以訪問。
4）全域變數
use vars qw($szVersionCode,$szVersionNmae), 作用是把變數$szVersionCode和$szVersionName定義
成全域變數。 其作用與our作用等同。由於其出現在my出現之後，our出現之前的一段曆史時間，因此，現在還可以
看到有些書上定義全域變數還延續這種定義方法，但是筆者建議：定義全域變數還是採用our關鍵字來定義。

PS:在Perl不使用use strict 'vars'的時候，我們可以任意使用變數而不需要實現定義。