On Monday 05 of November 2012 15:29:42 dexen wrote: > (...) here goes the venerable cat:
..and a bugfix -- support the all-important "-" ;-)
#!/usr/bin/env plmod
(mapcar '(
(file)
(in (if (= file "-")
NIL
file )
(use X
(until (== NIL
(setq X (rd 1)) )
(wr X) ) ) ) )
(argv))
(bye)
cheers,
--
dexen deVries
[[[↓][→]]]
How often I found where I should be going
only by setting out for somewhere else.
-- R. Buckminster Fuller
--
UNSUBSCRIBE: mailto:[email protected]?subject=Unsubscribe
