14 lines
215 B
Text
14 lines
215 B
Text
include "ConsoleWindow"
|
|
|
|
local fn DoUnixCommand( cmd as str255 )
|
|
dim as 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" )
|