aboutsummaryrefslogtreecommitdiff
path: root/challenge-110
diff options
context:
space:
mode:
authoraecepoglu <aecepoglu@fastmail.fm>2022-10-05 00:43:28 +0100
committeraecepoglu <aecepoglu@fastmail.fm>2022-10-05 00:48:03 +0100
commit28a6143292d728302fb8c2a171aa6d5fbd437ec1 (patch)
tree5852eaab4150b50c524d0130e4c91f46f06f19a1 /challenge-110
parentc2c9d22ffcf55b02aa3a5aeda5553f5b556e81af (diff)
downloadperlweeklychallenge-club-28a6143292d728302fb8c2a171aa6d5fbd437ec1.tar.gz
perlweeklychallenge-club-28a6143292d728302fb8c2a171aa6d5fbd437ec1.tar.bz2
perlweeklychallenge-club-28a6143292d728302fb8c2a171aa6d5fbd437ec1.zip
wk 101..125, 185
Diffstat (limited to 'challenge-110')
-rw-r--r--challenge-110/aecepoglu/README.md1
-rw-r--r--challenge-110/aecepoglu/bqn/ch-1.bqn12
-rw-r--r--challenge-110/aecepoglu/bqn/ch-2.bqn2
3 files changed, 15 insertions, 0 deletions
diff --git a/challenge-110/aecepoglu/README.md b/challenge-110/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-110/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-110/aecepoglu/bqn/ch-1.bqn b/challenge-110/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..81c95c8eab
--- /dev/null
+++ b/challenge-110/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,12 @@
+# VALID: +nn nn3nn6n8n0
+# VALID: (nn) nn3nn6n8n0
+# VALID: n2n4 nn3nn6n8n0
+F←(∧´1="0:"⍋⊢)∘({'+'‿a‿b:a‿b;'('‿a‿b‿')':a‿b;𝕩}∘⊑∾1⊸⊑)' '⊸((¬-˜⊢×·+`»>⊢)∘≠⊔⊢)
+F¨"+12 1234567890"‿"(12) 1234567890"‿"1234 1234567890"
+d←⟨"0044 1148820341",
+"+44 1148820341",
+"44-11-4882-0341",
+"(44) 1148820341",
+"00 1148820341",⟩
+d
+(F⎊0)¨⊸/d
diff --git a/challenge-110/aecepoglu/bqn/ch-2.bqn b/challenge-110/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..479583464d
--- /dev/null
+++ b/challenge-110/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,2 @@
+path←"pwc-110.csv"
+path •FLines ({𝕨∾','∾𝕩}´)¨⍉>','((⊢-˜¬×+`)∘=⊔⊢)¨•FLines path