diff options
| author | chirvasitua <chirvasitua@gmail.com> | 2021-07-11 22:04:02 -0400 |
|---|---|---|
| committer | chirvasitua <chirvasitua@gmail.com> | 2021-07-12 11:17:58 -0400 |
| commit | 062fc3ee0b5b2c3966cbdf91b134f8b7c85518dc (patch) | |
| tree | 8f8dae72a0d755e029758fafbf60baf794a60aaf | |
| parent | 2aaa200ead25d6ba79563871647c6c4abcf41c65 (diff) | |
| download | perlweeklychallenge-club-062fc3ee0b5b2c3966cbdf91b134f8b7c85518dc.tar.gz perlweeklychallenge-club-062fc3ee0b5b2c3966cbdf91b134f8b7c85518dc.tar.bz2 perlweeklychallenge-club-062fc3ee0b5b2c3966cbdf91b134f8b7c85518dc.zip | |
1st commit on 091_lua
| -rwxr-xr-x | challenge-091/stuart-little/lua/ch-1.lua | 17 | ||||
| -rwxr-xr-x | challenge-091/stuart-little/lua/ch-2.lua | 16 |
2 files changed, 33 insertions, 0 deletions
diff --git a/challenge-091/stuart-little/lua/ch-1.lua b/challenge-091/stuart-little/lua/ch-1.lua new file mode 100755 index 0000000000..ed15a0fdd5 --- /dev/null +++ b/challenge-091/stuart-little/lua/ch-1.lua @@ -0,0 +1,17 @@ +#!/usr/bin/env lua + +-- run <script> <number> + +local nr,state=0,arg[1]:sub(1,1) +local out = "" + +for i=1,arg[1]:len()+1 do + if arg[1]:sub(i,i) ~= state then + out = out .. nr .. state + nr=0 + state=arg[1]:sub(i,i) + end + nr=nr+1 +end + +print(out) diff --git a/challenge-091/stuart-little/lua/ch-2.lua b/challenge-091/stuart-little/lua/ch-2.lua new file mode 100755 index 0000000000..dc13984d19 --- /dev/null +++ b/challenge-091/stuart-little/lua/ch-2.lua @@ -0,0 +1,16 @@ +#!/usr/bin/env lua + +-- run <script> <space-separated numbers> + +local nr=1 +while true do + nr=nr+arg[nr] + if arg[nr] == nil then + print(1) + os.exit() + end + if tonumber(arg[nr])==0 then + print(0) + os.exit() + end +end |
