aboutsummaryrefslogtreecommitdiff
path: root/challenge-090
diff options
context:
space:
mode:
authorchirvasitua <chirvasitua@gmail.com>2021-07-11 08:07:29 -0400
committerchirvasitua <chirvasitua@gmail.com>2021-07-11 08:07:29 -0400
commit2aaa200ead25d6ba79563871647c6c4abcf41c65 (patch)
tree2ed92162caf074777fa34ef7c07f8fef73fa90ea /challenge-090
parentd574a03f56667d520e97a203be69b227c0adf9ab (diff)
downloadperlweeklychallenge-club-2aaa200ead25d6ba79563871647c6c4abcf41c65.tar.gz
perlweeklychallenge-club-2aaa200ead25d6ba79563871647c6c4abcf41c65.tar.bz2
perlweeklychallenge-club-2aaa200ead25d6ba79563871647c6c4abcf41c65.zip
1st commit on 089,090_lua
Diffstat (limited to 'challenge-090')
-rwxr-xr-xchallenge-090/stuart-little/lua/ch-1.lua5
-rwxr-xr-xchallenge-090/stuart-little/lua/ch-2.lua15
2 files changed, 20 insertions, 0 deletions
diff --git a/challenge-090/stuart-little/lua/ch-1.lua b/challenge-090/stuart-little/lua/ch-1.lua
new file mode 100755
index 0000000000..460d922fb9
--- /dev/null
+++ b/challenge-090/stuart-little/lua/ch-1.lua
@@ -0,0 +1,5 @@
+#!/usr/bin/env lua
+
+-- run <script> <string>
+
+print(arg[1]:upper():gsub(".",{A='T',T='A',C='G',G='C'}))
diff --git a/challenge-090/stuart-little/lua/ch-2.lua b/challenge-090/stuart-little/lua/ch-2.lua
new file mode 100755
index 0000000000..8628da786a
--- /dev/null
+++ b/challenge-090/stuart-little/lua/ch-2.lua
@@ -0,0 +1,15 @@
+#!/usr/bin/env lua
+
+-- run <script> <space-separated numbers>
+
+function egMult(a,b)
+ local l,r,p=math.min(a,b),math.max(a,b),0
+ while l>0 do
+ if l%2==1 then p=p+r end
+ l=math.floor(l/2)
+ r=r*2
+ end
+ return p
+end
+
+print(("%d"):format(egMult(0+arg[1],0+arg[2])))