diff options
| author | 冯昶 <fengchang@novel-supertv.com> | 2024-02-20 17:18:07 +0800 |
|---|---|---|
| committer | 冯昶 <fengchang@novel-supertv.com> | 2024-02-20 17:18:07 +0800 |
| commit | 9c3e6b937590b491ea821209f5199119bf24a5dc (patch) | |
| tree | ec7d33f8d7eda32699e6b9c72b175b8402508542 | |
| parent | 2812a5635198078f1354e7af7f8ac5d585976f5f (diff) | |
| download | perlweeklychallenge-club-9c3e6b937590b491ea821209f5199119bf24a5dc.tar.gz perlweeklychallenge-club-9c3e6b937590b491ea821209f5199119bf24a5dc.tar.bz2 perlweeklychallenge-club-9c3e6b937590b491ea821209f5199119bf24a5dc.zip | |
fix
| -rwxr-xr-x | challenge-255/feng-chang/raku/test.raku | 2 | ||||
| -rwxr-xr-x | challenge-256/feng-chang/raku/ch-2.raku | 3 |
2 files changed, 2 insertions, 3 deletions
diff --git a/challenge-255/feng-chang/raku/test.raku b/challenge-255/feng-chang/raku/test.raku index 228b30b9d8..d503e4a482 100755 --- a/challenge-255/feng-chang/raku/test.raku +++ b/challenge-255/feng-chang/raku/test.raku @@ -1,6 +1,6 @@ #!/bin/env raku -# The Weekly Challenge 254 +# The Weekly Challenge 255 use Test; sub pwc-test(Str:D $script, Bool :$deeply? = False, *@input) { diff --git a/challenge-256/feng-chang/raku/ch-2.raku b/challenge-256/feng-chang/raku/ch-2.raku index b487c7c3ef..106cdb90e0 100755 --- a/challenge-256/feng-chang/raku/ch-2.raku +++ b/challenge-256/feng-chang/raku/ch-2.raku @@ -2,5 +2,4 @@ unit sub MAIN(Str:D \s1, Str:D \s2); -my \len = (s1, s2)».chars.min; -put (s1.comb Z~ s2.comb).join ~ substr(s1, len) ~ substr(s2, len); +put roundrobin((s1, s2)».comb).flat.join; |