Makefile.PL

   1 use strict;
   2 use warnings;
   3 use ExtUtils::MakeMaker;
   4
   5 my @sign = (MM->can("signature_target") ? (SIGN => 1) : ());
   6 my $version_diff = 0; # we'll have to die if this becomes true
   7 my $version_from = 'lib/File/Rsync/Mirror/Recent.pm';
   8 if ($ARGV[0] && $ARGV[0] eq "--setversion") {
   9     eval {  require $version_from; };
  10     open my $fh, "make the-release-name|" or die;
  11     local $/;
  12     my ($have_version) = <$fh> =~ /^version\s+([\d\._]+)/m;
  13     my ($namespace) = $version_from;
  14     $namespace =~ s|^lib/(.+)\.pm$|$1|;
  15     $namespace =~ s|/|::|g;
  16     eval qq{ if (\$$namespace\::VERSION != \$have_version) {
  17         warn "Not equal: CPAN::Testers::ParseReport::VERSION[\$$namespace\::VERSION] Makefile version[\$have_version]";
  18         \$version_diff = 1;
  19     }};
  20 }
  21
  22 WriteMakefile
  23     (
  24      NAME                => 'File::Rsync::Mirror::Recent',
  25      AUTHOR              => 'Andreas König <andreas.koenig.7os6VVqR@franz.ak.mind.de>',
  26      VERSION_FROM        => $version_from,
  27      PL_FILES            => {},
  28      PREREQ_PM =>
  29      {
  30       # 'Data::Serializer' => 0.46, # restricted to YAML without it
  31       'File::Rsync'      => 0,
  32       'Test::More'       => 0,
  33       'File::Basename'   => 0,
  34       'File::Path'       => 0,
  35       'File::Temp'       => 0,
  36       'Scalar::Util'     => 0,
  37       'Time::HiRes'      => 0,
  38       'YAML::Syck'       => 0,
  39      },
  40      EXE_FILES    => [qw(bin/rrr-aggregate)],
  41      dist => {
  42               DIST_DEFAULT => join(" ", # note: order matters!
  43                                    "Makefile",
  44                                    "META.yml",
  45                                    "setversion",
  46                                    "all",
  47                                    "tardist",
  48                                   ),
  49               COMPRESS => 'gzip -9',
  50              },
  51      @sign,
  52      clean               => { FILES => 'File-Rsync-Mirror-Recent-*' },
  53     );
  54
  55 if ($version_diff){
  56   die "
  57 ==> I had to update some \$VERSIONs <==
  58 ==> Your Makefile has been rebuilt. <==
  59 ==> Please rerun the make command.  <==
  60 ";
  61 }
  62
  63 package MY;
  64 sub postamble {
  65   my @m;
  66   push @m, q{
  67 setversion:
  68         $(PERL) Makefile.PL --setversion
  69
  70 the-release-name :
  71         $(NOECHO) $(ECHO) 'version ' $(VERSION)
  72         $(NOECHO) $(ECHO) 'release-name ' $(DISTVNAME).tar$(SUFFIX)
  73
  74 release ::
  75         /usr/bin/perl -I../CPAN/GIT/trunk/release-lib -S release $(DISTVNAME).tar$(SUFFIX)
  76         rm -rf $(DISTVNAME)
  77
  78 sign:
  79         cpansign -s
  80 };
  81   join "", @m;
  82 }
  83
  84 sub dist_test {
  85   return q{
  86 # if we depend on $(DISTVNAME).tar$(SUFFIX), then the rest of the
  87 # Makefile breaks our intent to NOT remake dist
  88 disttest :
  89         rm -rf $(DISTVNAME)
  90         tar xvzf $(DISTVNAME).tar$(SUFFIX)
  91         cd $(DISTVNAME) && $(ABSPERLRUN) Makefile.PL
  92         cd $(DISTVNAME) && $(MAKE) $(PASTHRU)
  93         cd $(DISTVNAME) && $(MAKE) test $(PASTHRU)
  94
  95 distdir ::
  96         touch $(DISTVNAME)/SIGNATURE && $(CP) $(DISTVNAME)/SIGNATURE ./SIGNATURE
  97         $(CP) $(DISTVNAME)/META.yml  ./META.yml
  98         $(CP) $(DISTVNAME)/MANIFEST  ./MANIFEST
  99
 100 }
 101 }
 102
 103 sub distdir {
 104   my $self = shift;
 105   my $out = $self->SUPER::distdir;
 106   $out =~ s/distdir :/distdir ::/g;
 107   return $out;
 108 }
 109
 110 # dist_dir was the name in very old MakeMaker as of 5.005_04
 111 sub dist_dir {
 112   my $self = shift;
 113   my $out = $self->SUPER::dist_dir;
 114   $out =~ s/distdir :/distdir ::/g;
 115   return $out;
 116 }