12 lines
183 B
Text
12 lines
183 B
Text
local fn DoUnixCommand( cmd as str255 )
|
|
str255 s
|
|
|
|
open "Unix", 2, cmd
|
|
while ( not eof(2) )
|
|
line input #2, s
|
|
print s
|
|
wend
|
|
close 2
|
|
end fn
|
|
|
|
fn DoUnixCommand( "ls -A" )
|