From a0c5abef8989a8a12e8852396ee7eb9ab6b6a01a Mon Sep 17 00:00:00 2001
From: k-mx <cppfero@gmail.com>
Date: Thu, 2 May 2019 22:42:54 +0500
Subject: tidied, chmod +x

---
 challenge-006/maxim-kolodyazhny/perl5/ch-1.pl | 2 +-
 challenge-006/maxim-kolodyazhny/perl5/ch-2.pl | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)
 mode change 100644 => 100755 challenge-006/maxim-kolodyazhny/perl5/ch-1.pl
 mode change 100644 => 100755 challenge-006/maxim-kolodyazhny/perl5/ch-2.pl

diff --git a/challenge-006/maxim-kolodyazhny/perl5/ch-1.pl b/challenge-006/maxim-kolodyazhny/perl5/ch-1.pl
old mode 100644
new mode 100755
index 4ccfcc64a3..0a87aa1371
--- a/challenge-006/maxim-kolodyazhny/perl5/ch-1.pl
+++ b/challenge-006/maxim-kolodyazhny/perl5/ch-1.pl
@@ -12,7 +12,7 @@ s{
     (??{
         # this block is treated as a pattern
         # != will return '' (always match) or 1 (fail because of previous \b)
-        ($3-$1+1)*($1+$3)/2 != sum split ',', $&;
+        ( $3 - $1 + 1 ) * ( $1 + $3 ) / 2 != sum split ',', $&;
     })
 }
 {$1-$3}xg;
diff --git a/challenge-006/maxim-kolodyazhny/perl5/ch-2.pl b/challenge-006/maxim-kolodyazhny/perl5/ch-2.pl
old mode 100644
new mode 100755
index 23e6977981..ff3bc8aa53
--- a/challenge-006/maxim-kolodyazhny/perl5/ch-2.pl
+++ b/challenge-006/maxim-kolodyazhny/perl5/ch-2.pl
@@ -7,4 +7,4 @@ use v5.028.1;
 
 use bigrat qw(bexp PI);
 
-say bexp(PI*sqrt(163),80);
+say bexp( PI * sqrt(163), 80 );
-- 
cgit