diff options
| author | David Schwartz <dms061@bucknell.edu> | 2021-05-23 17:18:06 -0400 |
|---|---|---|
| committer | David Schwartz <dms061@bucknell.edu> | 2021-05-23 17:18:06 -0400 |
| commit | 4391c1feb7a45b67664b2f76d4e63ba234a007fd (patch) | |
| tree | d1748562a304274215c799fc3a9250c917eae5e9 /challenge-113/abigail/lua/ch-2.lua | |
| parent | b9522164f3a9255ee230ebe52a99c019826320b0 (diff) | |
| parent | 61987a0e3e38ad9320a5988c8bdeca55aeb46f29 (diff) | |
| download | perlweeklychallenge-club-4391c1feb7a45b67664b2f76d4e63ba234a007fd.tar.gz perlweeklychallenge-club-4391c1feb7a45b67664b2f76d4e63ba234a007fd.tar.bz2 perlweeklychallenge-club-4391c1feb7a45b67664b2f76d4e63ba234a007fd.zip | |
Merge remote-tracking branch 'upstream/master' into challenge113
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..5ba4c04ed9 --- /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 - tonumber (n)) + end + io . write ("\n") +end |