perlのスコープはブロック or ファイルなのだろうか - だるろぐ

ふとした拍子につまづいた。 以下を1個のファイル、例えば t.pl にでも書いて実行する。 package Hoge; use strict; use warnings; my $h = 1; package main; use strict; use warnings; my $h = 2; warn $h; さあ実行結果を予測しよう。 実行結果 % perl t.pl "my" variable $h masks earlier declaration in same scope at t.pl line 9. 2 at t.pl line 10.何でやねん。 そしてmainの中でのmy宣言を抜かすと 1 at t.pl line 9.となる。 解 恒例の柔道家に質問してみる。俺の成長が見えない。 perlのscopeは、block or file なんじゃないかね。 packageご

[kits]

packageの範囲とlexical変数の範囲は別。packageの範囲は次のpackageでも切り替わるが、lexical変数の範囲はblock or file。

[Yuichirou]

package文はレキシカル変数には影響しない