Perl 中的 use base 的用法

 

use base 是物件導向編程時，用來描述“基類”的，其實說白了，

use base somemodule;
就相當於以下兩句的結合：

BEGIN{
    use somemodule ();
    push @ISA, qw(somemodule);
}
也可以同時 use base 兩個或者兩個以上的模組，例如：

use base qw(Foo Bar);
就相當於：

BEGIN {
    use Foo ();
    use Bar ();
    push @ISA, qw(Foo Bar);
}
至於 @ISA 是個什麼樣的數組，這完全不關 use base 的事，
只不過，@ISA 是一個比較特殊的數組，它的含義可以參見大駱駝中的描述。

順便說一下，

use Foo ();
和
use Foo;
是不同的，
後者會自動調用 Foo 包裡的 import 函數，而前者不會。

use base somemodule;
比
use somemodule;
多了並且只多了一句
push @ISA, qw(somemodule);

 

轉載：http://blog.csdn.net/zll01/article/details/4520237