inc/Clean.pm

   1 package inc::Clean;
   2 use Moose;
   3
   4 with 'Dist::Zilla::Role::BeforeBuild';
   5
   6 sub before_build {
   7     my $self = shift;
   8
   9     if (-e 'Makefile') {
  10         $self->log("Running make distclean to clear out build cruft");
  11         system("$^X Makefile.PL && make distclean");
  12     }
  13
  14     if (-e 'META.yml') {
  15         $self->log("Removing existing META.yml file");
  16         unlink('META.yml');
  17     }
  18 }