[Reproducible-builds] Bug#834190: perl: please make the output of ExtUtils::Command::MM reproducible

[Chris Lamb]

Source: perl
Version: 5.22.2-3
Severity: wishlist
Tags: patch
User: reproducible-builds at lists.alioth.debian.org
Usertags: timestamps toolchain
X-Debbugs-Cc: reproducible-builds at lists.alioth.debian.org

Hi,

Whilst working on the Reproducible Builds effort [0], I noticed
that ExtUtils::Command::MM generates perllocal.pod files that are
not reproducible.

For example:

  -=head2 Sun Jul  3 14:56:53 2016: C<Mod  [..]
  +=head2 Sun Aug  6 23:18:50 2017: C<Mod  [..]

Patch attached.

 [0] https://reproducible-builds.org/


Regards,

-- 
      ,''`.
     : :'  :     Chris Lamb
     `. `'`      lamby at debian.org / chris-lamb.co.uk
       `-
-------------- next part --------------
diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm
index 203b3aa..0f1217b 100644
--- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm
+++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm
@@ -213,7 +213,8 @@ sub perllocal_install {
                            : @ARGV;
 
     my $pod;
-    $pod = sprintf <<POD, scalar localtime;
+    my $time = gmtime($ENV{SOURCE_DATE_EPOCH} || time);
+    $pod = sprintf <<POD, $time;
  =head2 %s: C<$type> L<$name|$name>
 
  =over 4