File: eol.lua

package info (click to toggle)
luasocket 2.0.1-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 764 kB
  • ctags: 652
  • sloc: ansic: 3,148; sh: 131; makefile: 89
file content (14 lines) | stat: -rw-r--r-- 625 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
-----------------------------------------------------------------------------
-- Little program to adjust end of line markers.
-- LuaSocket sample files
-- Author: Diego Nehab
-- RCS ID: $Id: eol.lua,v 1.8 2005/11/22 08:33:29 diego Exp $
-----------------------------------------------------------------------------
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)