aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad Sajid Anwar <Mohammad.Anwar@yahoo.com>2025-07-12 00:21:38 +0100
committerGitHub <noreply@github.com>2025-07-12 00:21:38 +0100
commit2f3fa768e72cb892df9615961e6ec1671738a29c (patch)
tree5f400cbaadac1450c67f05ab30dda43f3331a2ce
parent3e11cdc36cd5e183b532824378a4cb8230e207ad (diff)
parent54a0a05acb42b6dad1c630f2ca7e8b9a9272adb6 (diff)
downloadperlweeklychallenge-club-2f3fa768e72cb892df9615961e6ec1671738a29c.tar.gz
perlweeklychallenge-club-2f3fa768e72cb892df9615961e6ec1671738a29c.tar.bz2
perlweeklychallenge-club-2f3fa768e72cb892df9615961e6ec1671738a29c.zip
Merge pull request #12324 from memark/313
Solve 313 in Uiua
-rw-r--r--challenge-313/memark/uiua/.gitignore1
-rw-r--r--challenge-313/memark/uiua/ch-1.ua12
-rw-r--r--challenge-313/memark/uiua/ch-2.ua11
3 files changed, 24 insertions, 0 deletions
diff --git a/challenge-313/memark/uiua/.gitignore b/challenge-313/memark/uiua/.gitignore
new file mode 100644
index 0000000000..a910045315
--- /dev/null
+++ b/challenge-313/memark/uiua/.gitignore
@@ -0,0 +1 @@
+uiua-modules \ No newline at end of file
diff --git a/challenge-313/memark/uiua/ch-1.ua b/challenge-313/memark/uiua/ch-1.ua
new file mode 100644
index 0000000000..4ec874b81f
--- /dev/null
+++ b/challenge-313/memark/uiua/ch-1.ua
@@ -0,0 +1,12 @@
+# https://theweeklychallenge.org/blog/perl-weekly-challenge-313/#TASK1
+
+# Uiua 0.17.0-dev.1
+
+BrokenKeys ← ≍∩(⊜⊢+₁⊸⊛)
+
+┌─╴🧪
+ ⍤.≍ 1 BrokenKeys "perl" "perrrl"
+ ⍤.≍ 1 BrokenKeys "raku" "rrakuuuu"
+ ⍤.≍ 0 BrokenKeys "python" "perl"
+ ⍤.≍ 1 BrokenKeys "coffeescript" "cofffeescccript"
+└─╴
diff --git a/challenge-313/memark/uiua/ch-2.ua b/challenge-313/memark/uiua/ch-2.ua
new file mode 100644
index 0000000000..915b32a54a
--- /dev/null
+++ b/challenge-313/memark/uiua/ch-2.ua
@@ -0,0 +1,11 @@
+# https://theweeklychallenge.org/blog/perl-weekly-challenge-313/#TASK2
+
+# Uiua 0.17.0-dev.1
+
+ReverseLetters ← ⍜▽⇌⊸(≠₀±)
+
+┌─╴🧪
+ ⍤.≍ "l-re?p" ReverseLetters "p-er?l"
+ ⍤.≍ "yLk-e!e-w" ReverseLetters "wee-k!L-y"
+ ⍤.≍ "_e-!g_nel-la!h_c" ReverseLetters "_c-!h_all-en!g_e"
+└─╴