1

ブロックを持つPerlモジュールからグローバル変数を初期化しようとしていますがBEGIN、それを機能させることができません。

これはPerlモジュールです

Package A::B;
our $var;

BEGIN{
  $var ||= "/some/default/path";

  #create/access files/folders in $var
}

これは私のCGIスクリプトです

use A::B;
$A::B::var = "/correct/path";

しかし#error、$varが正しいパスではないために返されます

正しいパスがに割り当てられる前に、BEGINブロックが実行されてい$varます。BEGINブロックからコードを削除せずにこれを回避する方法はありますか?

4

1 に答える 1