1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
#!/usr/bin/env lua
require "alt_getopt"
local long_opts = {
verbose = "v",
help = "h",
fake = 0,
len = 1,
output = "o",
set_value = "S",
["set-output"] = "o"
}
local ret
local optarg
local optind
opts,optind,optarg = alt_getopt.get_ordered_opts (arg, "hVvo:n:S:", long_opts)
for i,v in ipairs (opts) do
if optarg [i] then
io.write ("option `" .. v .. "': " .. optarg [i] .. "\n")
else
io.write ("option `" .. v .. "'\n")
end
end
optarg,optind = alt_getopt.get_opts (arg, "hVvo:n:S:", long_opts)
for k,v in pairs (optarg) do
io.write ("fin-option `" .. k .. "': " .. v .. "\n")
end
for i = optind,#arg do
io.write (string.format ("ARGV [%s] = %s\n", i, arg [i]))
end
|
