diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2019-05-04 08:15:11 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2019-05-04 08:15:11 +0100 |
| commit | 4d9c788032a73de3199cb67bb27ba65c8df00deb (patch) | |
| tree | ba9d9a705932552452e05c162e692d6f547ab442 | |
| parent | 2f20ab9c6dfde7f02dcc78842d2319e844c21e40 (diff) | |
| parent | a0c5abef8989a8a12e8852396ee7eb9ab6b6a01a (diff) | |
| download | perlweeklychallenge-club-4d9c788032a73de3199cb67bb27ba65c8df00deb.tar.gz perlweeklychallenge-club-4d9c788032a73de3199cb67bb27ba65c8df00deb.tar.bz2 perlweeklychallenge-club-4d9c788032a73de3199cb67bb27ba65c8df00deb.zip | |
Merge pull request #117 from k-mx/master
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 ); |