aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLuca Ferrari <fluca1978@gmail.com>2021-05-18 13:37:00 +0200
committerLuca Ferrari <fluca1978@gmail.com>2021-05-18 13:37:00 +0200
commit3ee0b7ef523552853eedd4269e4346bd7460b591 (patch)
treec3495fada35d130744e8f87a59670fe59445ae70
parent39fd73a451bc410f43aef7daeed51b039e9100f3 (diff)
downloadperlweeklychallenge-club-3ee0b7ef523552853eedd4269e4346bd7460b591.tar.gz
perlweeklychallenge-club-3ee0b7ef523552853eedd4269e4346bd7460b591.tar.bz2
perlweeklychallenge-club-3ee0b7ef523552853eedd4269e4346bd7460b591.zip
A more compact implementation of sum.
-rw-r--r--challenge-113/luca-ferrari/raku/ch-2.p63
1 files changed, 1 insertions, 2 deletions
diff --git a/challenge-113/luca-ferrari/raku/ch-2.p6 b/challenge-113/luca-ferrari/raku/ch-2.p6
index 35a9376210..e181405599 100644
--- a/challenge-113/luca-ferrari/raku/ch-2.p6
+++ b/challenge-113/luca-ferrari/raku/ch-2.p6
@@ -8,8 +8,7 @@ class Node {
method sum() {
my $sum = $!value;
- $sum += $!left.sum if ( $!left );
- $sum += $!right.sum if ( $!right );
+ $sum += $_.sum if ( $_ ) for ( $!left, $!right );
return $sum;
}