diff options
| author | k-mx <cppfero@gmail.com> | 2019-05-02 22:42:54 +0500 |
|---|---|---|
| committer | k-mx <cppfero@gmail.com> | 2019-05-02 22:42:54 +0500 |
| commit | a0c5abef8989a8a12e8852396ee7eb9ab6b6a01a (patch) | |
| tree | f34cbb2ee0cb388d5bf754b879d352f99854cd21 | |
| parent | 7c1348bac2b8cfe68b8ffa2e01dee5aae8506ab9 (diff) | |
| download | perlweeklychallenge-club-a0c5abef8989a8a12e8852396ee7eb9ab6b6a01a.tar.gz perlweeklychallenge-club-a0c5abef8989a8a12e8852396ee7eb9ab6b6a01a.tar.bz2 perlweeklychallenge-club-a0c5abef8989a8a12e8852396ee7eb9ab6b6a01a.zip | |
tidied, chmod +x
| -rwxr-xr-x[-rw-r--r--] | challenge-006/maxim-kolodyazhny/perl5/ch-1.pl | 2 | ||||
| -rwxr-xr-x[-rw-r--r--] | challenge-006/maxim-kolodyazhny/perl5/ch-2.pl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/challenge-006/maxim-kolodyazhny/perl5/ch-1.pl b/challenge-006/maxim-kolodyazhny/perl5/ch-1.pl index 4ccfcc64a3..0a87aa1371 100644..100755 --- 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 index 23e6977981..ff3bc8aa53 100644..100755 --- 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 ); |