From ea92a6048b573dba8a5c3d2b5b2f270d523728d6 Mon Sep 17 00:00:00 2001
From: brian d foy <briandfoy@pobox.com>
Date: Thu, 11 Apr 2024 12:25:26 -0400
Subject: [PATCH] Can't use s///r in Perls before v5.14!

---
 Makefile.PL | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/Makefile.PL b/Makefile.PL
index 442b808..a608a15 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -42,13 +42,14 @@ my $module    = __PACKAGE__;
 
 my $github    = 'https://github.com/briandfoy/object-iterate';
 my $main_file = catfile( 'lib', split /::/, "$module.pm" );
+( my $pod_file = $main_file ) =~ s/\.pm\z/.pod/;
 
 my %WriteMakefile = (
 	'MIN_PERL_VERSION' => '5.008',
 
 	'NAME'          => $module,
-	'ABSTRACT_FROM' => $main_file =~ s/\.pm\z/.pod/r,
-	'VERSION_FROM'  => $main_file,
+	'ABSTRACT_FROM' => $main_file,
+	'VERSION_FROM'  => $pod_file,
 	'AUTHOR'        => 'brian d foy <briandfoy@pobox.com>',
 	'LICENSE'       => 'artistic_2',