.gitignore

@@ -1 +1 @@
-SOURCES/Data-Dumper-2.161.tar.gz
+SOURCES/Data-Dumper-2.173.tar.gz

.perl-Data-Dumper.metadata

@@ -1 +1 @@
-a20626bd76d293147dd8ff8afa88deafd2d26899 SOURCES/Data-Dumper-2.161.tar.gz
+91ca53fd5499b913996009e763d73ebeb51be8c3 SOURCES/Data-Dumper-2.173.tar.gz

SOURCES/Data-Dumper-2.167-fix-Data-Dumper-postentry-for-quoted-glob.patch

@@ -1,112 +0,0 @@
-From 76b7c82c2947d64a3494175ef6530b3fba8a499d Mon Sep 17 00:00:00 2001
-From: Zefram <zefram@fysh.org>
-Date: Wed, 10 Jan 2018 21:09:45 +0000
-Subject: [PATCH] fix Data-Dumper postentry for quoted glob
-MIME-Version: 1.0
-Content-Type: text/plain; charset=UTF-8
-Content-Transfer-Encoding: 8bit
-
-In Data-Dumper, where a glob with a quoted name required a postentry,
-the name part of the postentry was being emitted as just "}".  This was
-an old bug affecting upgraded glob names, which the recent commit
-abda9fe0fe75ae824723761c1c98af958f17a41c made affect all quoted glob
-names.  Fix the postentry name to encompass the entire quoted name.
-Fixes [perl #132695].
-
-Petr Písař: Ported to Data-Dumpe-2.167 from perl
-fb5043174b070927d312677f0a2f04a29b11349a.
-
-Signed-off-by: Petr Písař <ppisar@redhat.com>
----
- Dumper.xs  | 11 ++++++-----
- t/dumper.t | 32 +++++++++++++++++++++++++++++++-
- 2 files changed, 37 insertions(+), 6 deletions(-)
-
-diff --git a/Dumper.xs b/Dumper.xs
-index 8a16e04..206e8b5 100644
---- a/Dumper.xs
-+++ b/Dumper.xs
-@@ -1300,11 +1300,11 @@ DD_dump(pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, HV *seenhv,
- 		    i = 0; else i -= 4;
- 	    }
-             if (globname_needs_quote(c,i)) {
--		sv_grow(retval, SvCUR(retval)+2);
-+		sv_grow(retval, SvCUR(retval)+3);
- 		r = SvPVX(retval)+SvCUR(retval);
--		r[0] = '*'; r[1] = '{';
-+		r[0] = '*'; r[1] = '{'; r[2] = 0;
- 		SvCUR_set(retval, SvCUR(retval)+2);
--                esc_q_utf8(aTHX_ retval, c, i,
-+                i = 3 + esc_q_utf8(aTHX_ retval, c, i,
- #ifdef GvNAMEUTF8
- 			!!GvNAMEUTF8(val)
- #else
-@@ -1314,15 +1314,16 @@ DD_dump(pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, HV *seenhv,
- 		sv_grow(retval, SvCUR(retval)+2);
- 		r = SvPVX(retval)+SvCUR(retval);
- 		r[0] = '}'; r[1] = '\0';
--		i = 1;
-+		SvCUR_set(retval, SvCUR(retval)+1);
-+		r = r+1 - i;
- 	    }
- 	    else {
- 		sv_grow(retval, SvCUR(retval)+i+2);
- 		r = SvPVX(retval)+SvCUR(retval);
- 		r[0] = '*'; strcpy(r+1, c);
- 		i++;
-+		SvCUR_set(retval, SvCUR(retval)+i);
- 	    }
--	    SvCUR_set(retval, SvCUR(retval)+i);
- 
-             if (style->purity) {
- 		static const char* const entries[] = { "{SCALAR}", "{ARRAY}", "{HASH}" };
-diff --git a/t/dumper.t b/t/dumper.t
-index 0c12f34..e09a2dd 100644
---- a/t/dumper.t
-+++ b/t/dumper.t
-@@ -108,7 +108,7 @@ sub SKIP_TEST {
-   ++$TNUM; print "ok $TNUM # skip $reason\n";
- }
- 
--$TMAX = 456;
-+$TMAX = 468;
- 
- # Force Data::Dumper::Dump to use perl. We test Dumpxs explicitly by calling
- # it direct. Out here it lets us knobble the next if to test that the perl
-@@ -1773,3 +1773,33 @@ EOT
-   TEST (q(Data::Dumper->Dumpxs([\@globs], ["globs"])), 'globs: Dumpxs()')
-     if $XS;
- }
-+#############
-+$WANT = <<'EOT';
-+#$v = {
-+#  a => \*::ppp,
-+#  b => \*{'::a/b'},
-+#  c => \*{"::a\x{2603}b"}
-+#};
-+#*::ppp = {
-+#  a => 1
-+#};
-+#*{'::a/b'} = {
-+#  b => 3
-+#};
-+#*{"::a\x{2603}b"} = {
-+#  c => 5
-+#};
-+EOT
-+{
-+  *ppp = { a => 1 };
-+  *{"a/b"} = { b => 3 };
-+  *{"a\x{2603}b"} = { c => 5 };
-+  our $v = { a => \*ppp, b => \*{"a/b"}, c => \*{"a\x{2603}b"} };
-+  local $Data::Dumper::Purity = 1;
-+  TEST (q(Data::Dumper->Dump([$v], ["v"])), 'glob purity: Dump()');
-+  TEST (q(Data::Dumper->Dumpxs([$v], ["v"])), 'glob purity: Dumpxs()') if $XS;
-+  $WANT =~ tr/'/"/;
-+  local $Data::Dumper::Useqq = 1;
-+  TEST (q(Data::Dumper->Dump([$v], ["v"])), 'glob purity: Dump()');
-+  TEST (q(Data::Dumper->Dumpxs([$v], ["v"])), 'glob purity: Dumpxs()') if $XS;
-+}
--- 
-2.13.6
-

SOURCES/Data-Dumper-2.167-in-Data-Dumper-quote-glob-names-better.patch

@@ -1,134 +0,0 @@
-From 69beb4272d324bb0724b140b5ddca517e90d89b9 Mon Sep 17 00:00:00 2001
-From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
-Date: Tue, 5 Dec 2017 10:59:42 +0100
-Subject: [PATCH] in Data-Dumper, quote glob names better
-MIME-Version: 1.0
-Content-Type: text/plain; charset=UTF-8
-Content-Transfer-Encoding: 8bit
-
-Ported to Data-Dumper-1.167 from perl git tree:
-
-commit abda9fe0fe75ae824723761c1c98af958f17a41c
-Author: Zefram <zefram@fysh.org>
-Date:   Fri Dec 1 17:35:35 2017 +0000
-
-    in Data-Dumper, quote glob names better
-
-    Glob name quoting should obey Useqq.  Fixes [perl #119831].
-
-Signed-off-by: Petr Písař <ppisar@redhat.com>
----
- Dumper.pm  |  4 ++--
- Dumper.xs  | 22 +++++++---------------
- t/dumper.t | 35 ++++++++++++++++++++++++++++++++++-
- 3 files changed, 43 insertions(+), 18 deletions(-)
-
-diff --git a/Dumper.pm b/Dumper.pm
-index 00f6326..696964a 100644
---- a/Dumper.pm
-+++ b/Dumper.pm
-@@ -527,8 +527,8 @@ sub _dump {
-     $ref = \$val;
-     if (ref($ref) eq 'GLOB') {  # glob
-       my $name = substr($val, 1);
--      if ($name =~ /^[A-Za-z_][\w:]*$/ && $name ne 'main::') {
--        $name =~ s/^main::/::/;
-+      $name =~ s/^main::(?!\z)/::/;
-+      if ($name =~ /\A(?:[A-Z_a-z][0-9A-Z_a-z]*)?::(?:[0-9A-Z_a-z]+::)*[0-9A-Z_a-z]*\z/ && $name ne 'main::') {
-         $sname = $name;
-       }
-       else {
-diff --git a/Dumper.xs b/Dumper.xs
-index 5a21721..8a16e04 100644
---- a/Dumper.xs
-+++ b/Dumper.xs
-@@ -1300,29 +1300,21 @@ DD_dump(pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, HV *seenhv,
- 		    i = 0; else i -= 4;
- 	    }
-             if (globname_needs_quote(c,i)) {
--#ifdef GvNAMEUTF8
--	      if (GvNAMEUTF8(val)) {
- 		sv_grow(retval, SvCUR(retval)+2);
- 		r = SvPVX(retval)+SvCUR(retval);
- 		r[0] = '*'; r[1] = '{';
- 		SvCUR_set(retval, SvCUR(retval)+2);
--                esc_q_utf8(aTHX_ retval, c, i, 1, style->useqq);
-+                esc_q_utf8(aTHX_ retval, c, i,
-+#ifdef GvNAMEUTF8
-+			!!GvNAMEUTF8(val)
-+#else
-+			0
-+#endif
-+			, style->useqq);
- 		sv_grow(retval, SvCUR(retval)+2);
- 		r = SvPVX(retval)+SvCUR(retval);
- 		r[0] = '}'; r[1] = '\0';
- 		i = 1;
--	      }
--	      else
--#endif
--	      {
--		sv_grow(retval, SvCUR(retval)+6+2*i);
--		r = SvPVX(retval)+SvCUR(retval);
--		r[0] = '*'; r[1] = '{';	r[2] = '\'';
--		i += esc_q(r+3, c, i);
--		i += 3;
--		r[i++] = '\''; r[i++] = '}';
--		r[i] = '\0';
--	      }
- 	    }
- 	    else {
- 		sv_grow(retval, SvCUR(retval)+i+2);
-diff --git a/t/dumper.t b/t/dumper.t
-index 643160a..0c12f34 100644
---- a/t/dumper.t
-+++ b/t/dumper.t
-@@ -108,7 +108,7 @@ sub SKIP_TEST {
-   ++$TNUM; print "ok $TNUM # skip $reason\n";
- }
- 
--$TMAX = 450;
-+$TMAX = 456;
- 
- # Force Data::Dumper::Dump to use perl. We test Dumpxs explicitly by calling
- # it direct. Out here it lets us knobble the next if to test that the perl
-@@ -1740,3 +1740,36 @@ EOT
-         TEST (qq(Dumper("\n")), '\n alone');
-         TEST (qq(Data::Dumper::DumperX("\n")), '\n alone') if $XS;
- }
-+#############
-+our @globs = map { $_, \$_ } map { *$_ } map { $_, "s::$_" }
-+		"foo", "\1bar", "L\x{e9}on", "m\x{100}cron", "snow\x{2603}";
-+$WANT = <<'EOT';
-+#$globs = [
-+#  *::foo,
-+#  \*::foo,
-+#  *s::foo,
-+#  \*s::foo,
-+#  *{"::\1bar"},
-+#  \*{"::\1bar"},
-+#  *{"s::\1bar"},
-+#  \*{"s::\1bar"},
-+#  *{"::L\351on"},
-+#  \*{"::L\351on"},
-+#  *{"s::L\351on"},
-+#  \*{"s::L\351on"},
-+#  *{"::m\x{100}cron"},
-+#  \*{"::m\x{100}cron"},
-+#  *{"s::m\x{100}cron"},
-+#  \*{"s::m\x{100}cron"},
-+#  *{"::snow\x{2603}"},
-+#  \*{"::snow\x{2603}"},
-+#  *{"s::snow\x{2603}"},
-+#  \*{"s::snow\x{2603}"}
-+#];
-+EOT
-+{
-+  local $Data::Dumper::Useqq = 1;
-+  TEST (q(Data::Dumper->Dump([\@globs], ["globs"])), 'globs: Dump()');
-+  TEST (q(Data::Dumper->Dumpxs([\@globs], ["globs"])), 'globs: Dumpxs()')
-+    if $XS;
-+}
--- 
-2.13.6
-

SOURCES/Data-Dumper-2.173-Data-Dumper-avoid-leak-on-croak.patch

@@ -0,0 +1,167 @@
+From d9c4b4ae5a1a17347ff5e3ecbf8e1d9da481f476 Mon Sep 17 00:00:00 2001
+From: David Mitchell <davem@iabyn.com>
+Date: Wed, 3 Apr 2019 13:23:24 +0100
+Subject: [PATCH] Data::Dumper - avoid leak on croak
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+v5.21.3-742-g19be3be696 added a facility to Dumper.xs to croak if the
+recursion level became too deep (1000 by default).
+
+The trouble with this is that various parts of DD_dump() allocate
+temporary SVs and buffers, which will leak if DD_dump() unceremoniously
+just croaks().
+
+This currently manifests as dist/Data-Dumper/t/recurse.t failing under
+Address Sanitiser.
+
+This commit makes the depth checking code just set a sticky 'too deep'
+boolean flag, and
+a) on entry, DD_dump() just returns immediately if the flag is set;
+b) the flag is checked by the top-level called of DD_dump() and croaks
+if set.
+
+So the net effect is to defer croaking until the dump is complete,
+and avoid any further recursion once the flag is set.
+
+This is a bit of a quick fix. More long-term solutions would be to
+convert DD_dump() to be iterative rather than recursive, and/or make
+sure all temporary SVs and buffers are suitably anchored somewhere so
+that they get cleaned up on croak.
+
+Petr Písař: Ported from 6d65cb5d847ac93680949c4fa02111808207fbdc in
+perl git tree.
+
+Signed-off-by: Petr Písař <ppisar@redhat.com>
+---
+ Dumper.pm |  6 +++---
+ Dumper.xs | 27 ++++++++++++++++++++-------
+ 2 files changed, 23 insertions(+), 10 deletions(-)
+
+diff --git a/Dumper.pm b/Dumper.pm
+index 40aeb7d..06af4c4 100644
+--- a/Dumper.pm
++++ b/Dumper.pm
+@@ -10,7 +10,7 @@
+ package Data::Dumper;
+ 
+ BEGIN {
+-    $VERSION = '2.173'; # Don't forget to set version and release
++    $VERSION = '2.174'; # Don't forget to set version and release
+ }               # date in POD below!
+ 
+ #$| = 1;
+@@ -1461,13 +1461,13 @@ be to use the C<Sortkeys> filter of Data::Dumper.
+ 
+ Gurusamy Sarathy        gsar@activestate.com
+ 
+-Copyright (c) 1996-2017 Gurusamy Sarathy. All rights reserved.
++Copyright (c) 1996-2019 Gurusamy Sarathy. All rights reserved.
+ This program is free software; you can redistribute it and/or
+ modify it under the same terms as Perl itself.
+ 
+ =head1 VERSION
+ 
+-Version 2.173
++Version 2.174
+ 
+ =head1 SEE ALSO
+ 
+diff --git a/Dumper.xs b/Dumper.xs
+index 7f0b027..a324cb6 100644
+--- a/Dumper.xs
++++ b/Dumper.xs
+@@ -61,9 +61,10 @@
+ #endif
+ 
+ /* This struct contains almost all the user's desired configuration, and it
+- * is treated as constant by the recursive function. This arrangement has
+- * the advantage of needing less memory than passing all of them on the
+- * stack all the time (as was the case in an earlier implementation). */
++ * is treated as mostly constant (except for maxrecursed) by the recursive
++ * function.  This arrangement has the advantage of needing less memory
++ * than passing all of them on the stack all the time (as was the case in
++ * an earlier implementation). */
+ typedef struct {
+     SV *pad;
+     SV *xpad;
+@@ -74,6 +75,7 @@ typedef struct {
+     SV *toaster;
+     SV *bless;
+     IV maxrecurse;
++    bool maxrecursed; /* at some point we exceeded the maximum recursion level */
+     I32 indent;
+     I32 purity;
+     I32 deepcopy;
+@@ -97,7 +99,7 @@ static bool safe_decimal_number(const char *p, STRLEN len);
+ static SV *sv_x (pTHX_ SV *sv, const char *str, STRLEN len, I32 n);
+ static I32 DD_dump (pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval,
+                     HV *seenhv, AV *postav, const I32 level, SV *apad,
+-                    const Style *style);
++                    Style *style);
+ 
+ #ifndef HvNAME_get
+ #define HvNAME_get HvNAME
+@@ -615,7 +617,7 @@ deparsed_output(pTHX_ SV *val)
+  */
+ static I32
+ DD_dump(pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, HV *seenhv,
+-	AV *postav, const I32 level, SV *apad, const Style *style)
++	AV *postav, const I32 level, SV *apad, Style *style)
+ {
+     char tmpbuf[128];
+     Size_t i;
+@@ -642,6 +644,9 @@ DD_dump(pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, HV *seenhv,
+     if (!val)
+ 	return 0;
+ 
++    if (style->maxrecursed)
++        return 0;
++
+     /* If the output buffer has less than some arbitrary amount of space
+        remaining, then enlarge it. For the test case (25M of output),
+        *1.1 was slower, *2.0 was the same, so the first guess of 1.5 is
+@@ -793,7 +798,7 @@ DD_dump(pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, HV *seenhv,
+ 	}
+ 
+         if (style->maxrecurse > 0 && level >= style->maxrecurse) {
+-            croak("Recursion limit of %" IVdf " exceeded", style->maxrecurse);
++            style->maxrecursed = TRUE;
+ 	}
+ 
+ 	if (realpack && !no_bless) {				/* we have a blessed ref */
+@@ -1528,6 +1533,7 @@ Data_Dumper_Dumpxs(href, ...)
+             style.indent = 2;
+             style.quotekeys = 1;
+             style.maxrecurse = 1000;
++            style.maxrecursed = FALSE;
+             style.purity = style.deepcopy = style.useqq = style.maxdepth
+                 = style.use_sparse_seen_hash = style.trailingcomma = 0;
+             style.pad = style.xpad = style.sep = style.pair = style.sortkeys
+@@ -1675,7 +1681,7 @@ Data_Dumper_Dumpxs(href, ...)
+ 		    DD_dump(aTHX_ val, SvPVX_const(name), SvCUR(name), valstr, seenhv,
+                             postav, 0, newapad, &style);
+ 		    SPAGAIN;
+-		
++
+                     if (style.indent >= 2 && !terse)
+ 			SvREFCNT_dec(newapad);
+ 
+@@ -1715,6 +1721,13 @@ Data_Dumper_Dumpxs(href, ...)
+ 		}
+ 		SvREFCNT_dec(postav);
+ 		SvREFCNT_dec(valstr);
++
++                /* we defer croaking until here so that temporary SVs and
++                 * buffers won't be leaked */
++                if (style.maxrecursed)
++                    croak("Recursion limit of %" IVdf " exceeded",
++                            style.maxrecurse);
++		
+ 	    }
+ 	    else
+ 		croak("Call to new() method failed to return HASH ref");
+-- 
+2.20.1
+

SPECS/perl-Data-Dumper.spec

@@ -1,39 +1,39 @@
+%global base_version 2.173
+
 Name:           perl-Data-Dumper
-Version:        2.161
-Release:        5%{?dist}
+Version:        2.174
+Release:        440%{?dist}
 Summary:        Stringify perl data structures, suitable for printing and eval
 License:        GPL+ or Artistic
-Group:          Development/Libraries
-URL:            http://search.cpan.org/dist/Data-Dumper/
-Source0:        http://www.cpan.org/authors/id/S/SM/SMUELLER/Data-Dumper-%{version}.tar.gz
-# Fix quoting glob names, RT#119831, in upstream after perl-5.27.6
-Patch0:         Data-Dumper-2.167-in-Data-Dumper-quote-glob-names-better.patch
-# Fix postentry for quoted glob, bug #1532524, RT#132695,
-# in upstream after perl-5.27.7
-Patch1:         Data-Dumper-2.167-fix-Data-Dumper-postentry-for-quoted-glob.patch
+URL:            https://metacpan.org/release/Data-Dumper
+Source0:        https://cpan.metacpan.org/authors/id/X/XS/XSAWYERX/Data-Dumper-%{base_version}.tar.gz
+# Fix a memory leak when croaking about a too deep recursion,
+# fixed in perl after 5.29.9
+Patch0:         Data-Dumper-2.173-Data-Dumper-avoid-leak-on-croak.patch
 BuildRequires:  findutils
 BuildRequires:  gcc
 BuildRequires:  make
 BuildRequires:  perl-devel
 BuildRequires:  perl-generators
 BuildRequires:  perl-interpreter
-BuildRequires:  perl(ExtUtils::MakeMaker)
-BuildRequires:  sed
+BuildRequires:  perl(ExtUtils::MakeMaker) >= 6.76
+BuildRequires:  perl(File::Copy)
+BuildRequires:  perl(strict)
+# perl-Test-Simple is in cycle with perl-Data-Dumper
+%if !%{defined perl_bootstrap}
 # Run-time:
 BuildRequires:  perl(B::Deparse)
 BuildRequires:  perl(bytes)
 BuildRequires:  perl(Carp)
 BuildRequires:  perl(constant)
 BuildRequires:  perl(Exporter)
-BuildRequires:  perl(overload)
 BuildRequires:  perl(Scalar::Util)
 BuildRequires:  perl(XSLoader)
-# perl-Test-Simple is in cycle with perl-Data-Dumper
-%if !%{defined perl_bootstrap}
 # Tests only:
 BuildRequires:  perl(Config)
 BuildRequires:  perl(if)
 BuildRequires:  perl(lib)
+BuildRequires:  perl(overload)
 BuildRequires:  perl(strict)
 BuildRequires:  perl(Test::More) >= 0.98
 BuildRequires:  perl(vars)
@@ -56,18 +56,15 @@ variable is output in a single Perl statement. Handles self-referential
 structures correctly.
 
 %prep
-%setup -q -n Data-Dumper-%{version}
+%setup -q -n Data-Dumper-%{base_version}
 %patch0 -p1
-%patch1 -p1
-sed -i '/MAN3PODS/d' Makefile.PL
 
 %build
-perl Makefile.PL INSTALLDIRS=vendor OPTIMIZE="$RPM_OPT_FLAGS"
+perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1 OPTIMIZE="$RPM_OPT_FLAGS"
 make %{?_smp_mflags}
 
 %install
 make pure_install DESTDIR=$RPM_BUILD_ROOT
-find $RPM_BUILD_ROOT -type f -name .packlist -delete
 find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -delete
 %{_fixperms} $RPM_BUILD_ROOT/*
 
@@ -83,15 +80,66 @@ make test
 %{_mandir}/man3/*
 
 %changelog
-* Fri Mar 29 2019 Jitka Plesnikova <jplesnik@redhat.com> - 2.161-5
-- Rebuild with enable hardening (bug #1636329)
+* Fri Jul 26 2019 Fedora Release Engineering <releng@fedoraproject.org> - 2.174-440
+- Rebuilt for https://fedoraproject.org/wiki/Fedora_31_Mass_Rebuild
 
-* Thu Jan 11 2018 Petr Pisar <ppisar@redhat.com> - 2.161-4
+* Sun Jun 02 2019 Jitka Plesnikova <jplesnik@redhat.com> - 2.174-439
+- Perl 5.30 re-rebuild of bootstrapped packages
+
+* Thu May 30 2019 Jitka Plesnikova <jplesnik@redhat.com> - 2.174-438
+- Increase release to favour standalone package
+
+* Fri Apr 26 2019 Jitka Plesnikova <jplesnik@redhat.com> - 2.174-1
+- Update version to 2.174 as provided in perl-5.29.10
+
+* Wed Apr 03 2019 Petr Pisar <ppisar@redhat.com> - 2.173-3
+- Fix a memory leak when croaking about a too deep recursion
+
+* Fri Feb 01 2019 Fedora Release Engineering <releng@fedoraproject.org> - 2.173-2
+- Rebuilt for https://fedoraproject.org/wiki/Fedora_30_Mass_Rebuild
+
+* Mon Nov 12 2018 Petr Pisar <ppisar@redhat.com> - 2.173-1
+- 2.173 bump
+
+* Thu Sep 20 2018 Jitka Plesnikova <jplesnik@redhat.com> - 2.172-1
+- 2.172 bump
+
+* Fri Jul 13 2018 Fedora Release Engineering <releng@fedoraproject.org> - 2.170-418
+- Rebuilt for https://fedoraproject.org/wiki/Fedora_29_Mass_Rebuild
+
+* Sat Jun 30 2018 Jitka Plesnikova <jplesnik@redhat.com> - 2.170-417
+- Perl 5.28 re-rebuild of bootstrapped packages
+
+* Wed Jun 27 2018 Jitka Plesnikova <jplesnik@redhat.com> - 2.170-416
+- Increase release to favour standalone package
+
+* Wed May 23 2018 Jitka Plesnikova <jplesnik@redhat.com> - 2.170-1
+- Upgrade to 2.170 as provided in perl-5.28.0-RC1
+
+* Thu Feb 08 2018 Fedora Release Engineering <releng@fedoraproject.org> - 2.167-399
+- Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild
+
+* Thu Jan 11 2018 Petr Pisar <ppisar@redhat.com> - 2.167-398
 - Fix postentry for quoted glob (bug #1532524)
 
-* Tue Dec 05 2017 Petr Pisar <ppisar@redhat.com> - 2.161-3
+* Tue Dec 05 2017 Petr Pisar <ppisar@redhat.com> - 2.167-397
 - Fix quoting glob names (RT#119831)
 
+* Thu Aug 03 2017 Fedora Release Engineering <releng@fedoraproject.org> - 2.167-396
+- Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Binutils_Mass_Rebuild
+
+* Thu Jul 27 2017 Fedora Release Engineering <releng@fedoraproject.org> - 2.167-395
+- Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Mass_Rebuild
+
+* Wed Jun 07 2017 Jitka Plesnikova <jplesnik@redhat.com> - 2.167-394
+- Perl 5.26 re-rebuild of bootstrapped packages
+
+* Sat Jun 03 2017 Jitka Plesnikova <jplesnik@redhat.com> - 2.167-393
+- Perl 5.26 rebuild
+
+* Thu May 11 2017 Petr Pisar <ppisar@redhat.com> - 2.167-1
+- Upgrade to 2.167 as provided in perl-5.25.12
+
 * Sat Feb 11 2017 Fedora Release Engineering <releng@fedoraproject.org> - 2.161-2
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_26_Mass_Rebuild