# main

use base qw(A) ;

&test() ;

package A ;
sub test {

}


##</code><code>##

  use base qw(A) ;
to
  use A ;