diff options
| author | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-03-02 22:54:03 +0100 |
|---|---|---|
| committer | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-03-02 22:54:03 +0100 |
| commit | 65d9421eae52fb4937f65b2ae723b56e68da941c (patch) | |
| tree | 89239c115e006aa0700c4f88cef1e0493fa5f4cc /challenge-050 | |
| parent | ef3f1c49f3c9f9569d35e720ea14f03e22f75ba6 (diff) | |
| download | perlweeklychallenge-club-65d9421eae52fb4937f65b2ae723b56e68da941c.tar.gz perlweeklychallenge-club-65d9421eae52fb4937f65b2ae723b56e68da941c.tar.bz2 perlweeklychallenge-club-65d9421eae52fb4937f65b2ae723b56e68da941c.zip | |
condensed to one liner
Diffstat (limited to 'challenge-050')
| -rw-r--r-- | challenge-050/markus-holzer/raku/ch-2.p6 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-050/markus-holzer/raku/ch-2.p6 b/challenge-050/markus-holzer/raku/ch-2.p6 index 8daaa8d456..a86101d626 100644 --- a/challenge-050/markus-holzer/raku/ch-2.p6 +++ b/challenge-050/markus-holzer/raku/ch-2.p6 @@ -1,6 +1,6 @@ sub noble( @n ) { - ( $_ = @n.sort.kv.batch(2).grep({ .[1] == @n.end - .[0] }).first ) ?? $_[1] !! Nil; + ( $_ = @n.sort.kv.batch(2).first({ .[1] == @n.end - .[0] }) ) ?? $_[1] !! Nil; } say noble( [2, 4, 0, 3] ); |