diff options
| author | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-09-15 00:46:05 +0200 |
|---|---|---|
| committer | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-09-15 00:46:05 +0200 |
| commit | 378c0f3036885c90937ad6a9046d600cc86b407c (patch) | |
| tree | 198e1e4401f719646be10f1a8f48bdda9b88ff0e | |
| parent | f35c9dd4d2bb6bfcb8929285fb7ce9d6ecefcc43 (diff) | |
| download | perlweeklychallenge-club-378c0f3036885c90937ad6a9046d600cc86b407c.tar.gz perlweeklychallenge-club-378c0f3036885c90937ad6a9046d600cc86b407c.tar.bz2 perlweeklychallenge-club-378c0f3036885c90937ad6a9046d600cc86b407c.zip | |
initial
| -rw-r--r-- | challenge-078/markus-holzer/raku/ch-1.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-078/markus-holzer/raku/ch-1.raku b/challenge-078/markus-holzer/raku/ch-1.raku index bcad67caa5..c8ce56705f 100644 --- a/challenge-078/markus-holzer/raku/ch-1.raku +++ b/challenge-078/markus-holzer/raku/ch-1.raku @@ -6,7 +6,7 @@ sub leader-elements( @stuff ) { sub find( $that, *@the-rest ) { take $that if $that > all @the-rest; find |@the-rest if @the-rest } -i + +@stuff ?? gather find |@stuff !! 0 } # |