From 071408de692b446843bdc102d5b71acea69cfc92 Mon Sep 17 00:00:00 2001
From: drbaggy <js5@sanger.ac.uk>
Date: Mon, 25 Jan 2021 15:24:12 +0000
Subject: golfed

---
 challenge-097/james-smith/perl/ch-2.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/challenge-097/james-smith/perl/ch-2.pl b/challenge-097/james-smith/perl/ch-2.pl
index 9df291a034..a995d64d5c 100644
--- a/challenge-097/james-smith/perl/ch-2.pl
+++ b/challenge-097/james-smith/perl/ch-2.pl
@@ -23,7 +23,7 @@ sub min_flips {
             !$_ || $_ < $/ ? $\ : $/,
         }
     map { $_*$_[1] }
-    0 .. (length($_[0])/$_[1]-1)
+    0 .. ( length($_[0])/$_[1] - 1 )
   ]->[-1];
   ## We could use variales here - but playing with localised special variables is fun!
   ## $/ <- minimum value
-- 
cgit