12 lines
228 B
Text
12 lines
228 B
Text
|
decl string<> arg
|
||
|
|
decl string<> output
|
||
|
|
decl iodevice iod
|
||
|
|
|
||
|
|
append "ls" arg
|
||
|
|
set iod (ursa.util.process.start arg)
|
||
|
|
set output (iod.readlines)
|
||
|
|
|
||
|
|
for (decl int i) (< i (size output)) (inc i)
|
||
|
|
out output<i> endl console
|
||
|
|
end for
|