diff options
| author | Magnus Markling <magnus@markling.com> | 2025-07-29 15:22:31 +0200 |
|---|---|---|
| committer | Magnus Markling <magnus@markling.com> | 2025-07-29 15:35:38 +0200 |
| commit | 3424b5a1db3af822355947f2ef13fe8fcf681f78 (patch) | |
| tree | 691bf462b7b4fba86c82813bd3b0a7432389c6b1 | |
| parent | 1ff2c9796a511d63231d3757acb27e4046a91fb2 (diff) | |
| download | perlweeklychallenge-club-3424b5a1db3af822355947f2ef13fe8fcf681f78.tar.gz perlweeklychallenge-club-3424b5a1db3af822355947f2ef13fe8fcf681f78.tar.bz2 perlweeklychallenge-club-3424b5a1db3af822355947f2ef13fe8fcf681f78.zip | |
Solve 332
| -rw-r--r-- | challenge-332/memark/uiua/ch-1.ua | 11 | ||||
| -rw-r--r-- | challenge-332/memark/uiua/ch-2.ua | 11 |
2 files changed, 22 insertions, 0 deletions
diff --git a/challenge-332/memark/uiua/ch-1.ua b/challenge-332/memark/uiua/ch-1.ua new file mode 100644 index 0000000000..4d87e7461c --- /dev/null +++ b/challenge-332/memark/uiua/ch-1.ua @@ -0,0 +1,11 @@ +# https://theweeklychallenge.org/blog/perl-weekly-challenge-332/#TASK1 + +# Uiua 0.17.0-dev.1 + +BinaryDate ← ⍜⊜□⍚(/$"__"⇌⋯⋕) ≠@-. + +┌─╴🧪 + ⍤.≍ "11111101001-111-11010" BinaryDate "2025-07-26" + ⍤.≍ "11111010000-10-10" BinaryDate "2000-02-02" + ⍤.≍ "11111101000-1100-11111" BinaryDate "2024-12-31" +└─╴ diff --git a/challenge-332/memark/uiua/ch-2.ua b/challenge-332/memark/uiua/ch-2.ua new file mode 100644 index 0000000000..79b8ad2807 --- /dev/null +++ b/challenge-332/memark/uiua/ch-2.ua @@ -0,0 +1,11 @@ +# https://theweeklychallenge.org/blog/perl-weekly-challenge-332/#TASK2 + +# Uiua 0.17.0-dev.1 + +OddLetters ← /↧◿2 ⊕⧻ ⊛. + +┌─╴🧪 + ⍤.≍ 0 OddLetters "weekly" + ⍤.≍ 1 OddLetters "perl" + ⍤.≍ 0 OddLetters "challenge" +└─╴ |