use base qw(A) ;
to
  use A ;