diff options
| author | Abigail <abigail@abigail.be> | 2021-05-19 18:44:56 +0200 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2021-05-19 18:44:56 +0200 |
| commit | 23b2fd7bb31c97cd99ae62dc522a7607fcc2a297 (patch) | |
| tree | 64eef6d1a87dc0bce697cf55c3ee4a396be6b062 /challenge-113/abigail/lua/ch-2.lua | |
| parent | e37b3682edfb32852e05d41a231fb43e9c0254f8 (diff) | |
| download | perlweeklychallenge-club-23b2fd7bb31c97cd99ae62dc522a7607fcc2a297.tar.gz perlweeklychallenge-club-23b2fd7bb31c97cd99ae62dc522a7607fcc2a297.tar.bz2 perlweeklychallenge-club-23b2fd7bb31c97cd99ae62dc522a7607fcc2a297.zip | |
Lua solutions for week 113
Diffstat (limited to 'challenge-113/abigail/lua/ch-2.lua')
| -rw-r--r-- | challenge-113/abigail/lua/ch-2.lua | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/challenge-113/abigail/lua/ch-2.lua b/challenge-113/abigail/lua/ch-2.lua new file mode 100644 index 0000000000..15aac1ac2d --- /dev/null +++ b/challenge-113/abigail/lua/ch-2.lua @@ -0,0 +1,25 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-2.lua < input-file +-- + +for line in io . lines () do + local sum = 0 + for n in line : gmatch ("[0-9]+") + do sum = sum + tonumber (n) + end + local c = 0 + for n in line : gmatch ("[0-9]+") + do if c > 0 + then io . write (" ") + end + c = c + 1 + io . write (sum - n) + end + io . write ("\n") +end |