Michael G Schwern wrote: > === lib/ExtUtils/MM_Any.pm > ================================================================== > --- lib/ExtUtils/MM_Any.pm (revision 4360) > +++ lib/ExtUtils/MM_Any.pm (local) > @@ -771,6 +771,10 @@ > my @dirs = qw($(DISTVNAME)); > my @files = qw($(FIRST_MAKEFILE) $(MAKEFILE_OLD)); > > + # Special exception for the perl core where INST_* is not in blib. > + # This cleans up the files built from the ext/ directory (all XS). > + push @dirs, qw($(INST_AUTODIR) $(INST_ARCHAUTODIR)) if > $self->{PERL_CORE};
That's not going to work. push @dirs, qw($(INST_LIBDIR) $(INST_ARCHLIBDIR)) if $self->{PERL_CORE}; would be better, but it will remove too many things though. What I need is to remove all .pm files installed in lib/ during the compilation process, and their parent directories if becomed empty.