mirror of
https://github.com/lunarmodules/luasocket.git
synced 2024-11-08 14:28:21 +01:00
19 lines
674 B
Lua
19 lines
674 B
Lua
require("ltn12")
|
|
require("mime")
|
|
local convert
|
|
arg = arg or {}
|
|
local mode = arg and arg[1] or "-et"
|
|
if mode == "-et" then
|
|
local normalize = mime.normalize()
|
|
local qp = mime.encode("quoted-printable")
|
|
local wrap = mime.wrap("quoted-printable")
|
|
convert = ltn12.filter.chain(normalize, qp, wrap)
|
|
elseif mode == "-eb" then
|
|
local qp = mime.encode("quoted-printable", "binary")
|
|
local wrap = mime.wrap("quoted-printable")
|
|
convert = ltn12.filter.chain(qp, wrap)
|
|
else convert = mime.decode("quoted-printable") end
|
|
local source = ltn12.source.chain(ltn12.source.file(io.stdin), convert)
|
|
local sink = ltn12.sink.file(io.stdout)
|
|
ltn12.pump.all(source, sink)
|