mirror of
https://github.com/lunarmodules/luasocket.git
synced 2024-11-16 18:28:21 +01:00
15 lines
580 B
Lua
15 lines
580 B
Lua
-----------------------------------------------------------------------------
|
|
-- Little program to adjust end of line markers.
|
|
-- LuaSocket sample files
|
|
-- Author: Diego Nehab
|
|
-- RCS ID: $Id$
|
|
-----------------------------------------------------------------------------
|
|
local mime = require("mime")
|
|
local ltn12 = require("ltn12")
|
|
local marker = '\n'
|
|
if arg and arg[1] == '-d' then marker = '\r\n' end
|
|
local filter = mime.normalize(marker)
|
|
local source = ltn12.source.chain(ltn12.source.file(io.stdin), filter)
|
|
local sink = ltn12.sink.file(io.stdout)
|
|
ltn12.pump.all(source, sink)
|