From e826691c8b6abeabe2f401f0b8a1003e1c14374c Mon Sep 17 00:00:00 2001
From: Matthew Neleigh <matthew.neleigh@gmail.com>
Date: Thu, 27 Jan 2022 13:34:51 -0500
Subject: 	modified:   challenge-149/mattneleigh/perl/ch-2.pl

---
 challenge-149/mattneleigh/perl/ch-2.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/challenge-149/mattneleigh/perl/ch-2.pl b/challenge-149/mattneleigh/perl/ch-2.pl
index 32b9c0f7dc..4bbe2b11c8 100755
--- a/challenge-149/mattneleigh/perl/ch-2.pl
+++ b/challenge-149/mattneleigh/perl/ch-2.pl
@@ -74,7 +74,8 @@ sub calculate_largest_non_repeating_square_in_base{
         (
             # Assignment to capture digit string is deliberate
             ($digit_string = number_to_digit_string($root ** 2, $base))
-            =~ m/(.).{0,}\1/
+            =~
+            m/(.).{0,}\1/
         )
     ){
         # Decrement the root
-- 
cgit