#!/usr/bin/env retro
~~~
#0
script:get-argument
[
s:put nl
]
file:for-each-line
~~~