perl 继承写法 

use base (Critter);  
  
和  
  
BEGIN{  
require Critter;  
@ISA=qw/Critter/;  
}  
这两种写法是等价

posted @ 2016-08-18 22:28  czcb  阅读(143)  评论(0)  编辑  收藏  举报