2004-06-17 06:23:13 +00:00
|
|
|
-----------------------------------------------------------------------------
|
2005-11-22 08:33:29 +00:00
|
|
|
-- Little program to adjust end of line markers.
|
2004-06-17 06:23:13 +00:00
|
|
|
-- LuaSocket sample files
|
|
|
|
|
-- Author: Diego Nehab
|
|
|
|
|
-- RCS ID: $Id$
|
|
|
|
|
-----------------------------------------------------------------------------
|
2004-06-04 15:15:45 +00:00
|
|
|
local mime = require("mime")
|
|
|
|
|
local ltn12 = require("ltn12")
|
2004-03-22 04:15:03 +00:00
|
|
|
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)
|
2004-05-28 07:47:41 +00:00
|
|
|
ltn12.pump.all(source, sink)
|
