diff options
Diffstat (limited to 'challenge-110/abigail/lua/ch-1.lua')
| -rw-r--r-- | challenge-110/abigail/lua/ch-1.lua | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/challenge-110/abigail/lua/ch-1.lua b/challenge-110/abigail/lua/ch-1.lua new file mode 100644 index 0000000000..a118074744 --- /dev/null +++ b/challenge-110/abigail/lua/ch-1.lua @@ -0,0 +1,24 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-1.lua < input-file +-- + +for line in io . lines () do + local number = line : gsub (" ", "") -- Remove spaces + if -- nnnn nnnnnnnnnn + number : find ("^[0-9][0-9][0-9][0-9][0-9][0-9][0-9]" .. + "[0-9][0-9][0-9][0-9][0-9][0-9][0-9]$") or + -- +nn nnnnnnnnnn + number : find ("^%+[0-9][0-9][0-9][0-9][0-9]" .. + "[0-9][0-9][0-9][0-9][0-9][0-9][0-9]$") or + -- (nn) nnnnnnnnnn + number : find ("^%([0-9][0-9]%)[0-9][0-9][0-9]" .. + "[0-9][0-9][0-9][0-9][0-9][0-9][0-9]$") + then print (line) + end +end |