perl可以定義靜態(tài)全局不?

beautiful_code

就是我想在一個pm文件里面定義一個全局變量，而這個全局只能在這個文件里面用。perl有可以實現這個的方法不

yakczh_cu

package mypackage;
our $var='xxx';

beautiful_code

這樣這個全局變量就可以在別的pl文件里面使用了吧回復 2# yakczh_cu


   

yakczh_cu

回復 3# beautiful_code

別的地方引用要帶上命名空間
    test.pl
use mypackage;

print   $mypackage::var;

beautiful_code

回復 4# yakczh_cu
是啊 我就是希望這個全局不能被其他的pl文件訪問啊 只在這個pm文件里面使用，就相當于static的作用。

   

ttcn_cu

package Foo;
my $Bar;
sub youfunc{
    $Bar=1;

}

beautiful_code

回復 6# ttcn_cu

你的意思是把our改成my就可以了?
   

tadegenban

my 就是你要的

beautiful_code

回復 8# tadegenban

這樣