aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon Proctor <simon.proctor@zoopla.co.uk>2020-09-14 11:35:38 +0100
committerSimon Proctor <simon.proctor@zoopla.co.uk>2020-09-14 11:35:38 +0100
commit26567d0144ea710905bb937d4ebf0b3fa5143349 (patch)
tree8641f74ef6b6d17323caa77f83412b37ca107cf0
parentf499375b61cd0dd5f90e73df9a9b69a7384c4c6c (diff)
downloadperlweeklychallenge-club-26567d0144ea710905bb937d4ebf0b3fa5143349.tar.gz
perlweeklychallenge-club-26567d0144ea710905bb937d4ebf0b3fa5143349.tar.bz2
perlweeklychallenge-club-26567d0144ea710905bb937d4ebf0b3fa5143349.zip
Small change to range
-rw-r--r--challenge-078/simon-proctor/raku/ch-1.raku2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-078/simon-proctor/raku/ch-1.raku b/challenge-078/simon-proctor/raku/ch-1.raku
index 82dc9168fe..dfcef3ff8d 100644
--- a/challenge-078/simon-proctor/raku/ch-1.raku
+++ b/challenge-078/simon-proctor/raku/ch-1.raku
@@ -6,5 +6,5 @@ use v6;
sub MAIN(
*@a where { .all ~~ Int } #= List of integers
) {
- @a.kv.map( -> $i, $v { $v >= all(@a[$i..*]) ?? $v !! Empty }).join(", ").say;
+ @a.kv.map( -> $i, $v { $v > all(@a[$i^..*]) ?? $v !! Empty }).join(", ").say;
}