diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2020-05-23 20:50:55 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-05-23 20:50:55 +0100 |
| commit | df3a7d4eddfa64ed9491736051d45b604c5d4ecb (patch) | |
| tree | d130ef5db03b9b91c060f27233cb77ff6d4ad750 /challenge-061 | |
| parent | 921a752a5dbeab72ce797610b4f21be2ba86f948 (diff) | |
| parent | e3d1c6dcae1be78fc9b861fd4d8b02724d5fae61 (diff) | |
| download | perlweeklychallenge-club-df3a7d4eddfa64ed9491736051d45b604c5d4ecb.tar.gz perlweeklychallenge-club-df3a7d4eddfa64ed9491736051d45b604c5d4ecb.tar.bz2 perlweeklychallenge-club-df3a7d4eddfa64ed9491736051d45b604c5d4ecb.zip | |
Merge pull request #1748 from holli-holzer/master
initial + final
Diffstat (limited to 'challenge-061')
| -rw-r--r-- | challenge-061/markus-holzer/raku/ch-1.raku | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/challenge-061/markus-holzer/raku/ch-1.raku b/challenge-061/markus-holzer/raku/ch-1.raku new file mode 100644 index 0000000000..643c3b4c9a --- /dev/null +++ b/challenge-061/markus-holzer/raku/ch-1.raku @@ -0,0 +1,8 @@ +sub MAIN( *@n where { .elems > 0 && .all ~~ Numeric } ) +{ + ( 2 .. @n ) + .map( -> $length { |@n.rotor( $length => - $length + 1 ) } ) + .sort( -> $sublist { - [*] |$sublist } ) + .first + .say; +}
\ No newline at end of file |