Get system command output: Difference between revisions

no edit summary
(Applesoft BASIC)
No edit summary
Line 1,256:
Volume Serial Number is 8C33-162D
</pre>
 
=={{header|PureBasic}}==
<lang PureBasic>If OpenConsole("ls")
rp=RunProgram("ls", "-l", "",#PB_Program_Open|#PB_Program_Read)
While ProgramRunning(rp)
If AvailableProgramOutput(rp)
r$+ReadProgramString(rp)+#LF$
EndIf
Wend
CloseProgram(rp)
PrintN(r$)
Input()
EndIf
</lang>
 
=={{header|Python}}==
164

edits