1package autoclass_035::ragged::r31; 2use base qw(autoclass_035::ragged::r21 autoclass_035::external::ext3); 3 4sub _init_self { 5 my($self,$class,$args)=@_; 6 push(@{$self->{init_self_history}},'r31'); 7 } 81; 9