Walk a directory/Recursively: Difference between revisions

(→‎{{header|TXR}}: Remove unnecessary HTML escapes in pre block.)
Line 860:
 
=={{header|Gambas}}==
'''[https://gambas-playground.proko.eu/ You can run this code. Copy the code, click this link, paste it in and press 'Run !']'''
<lang gambas>Public Sub Form_OpenMain()
Dim sTree As New String[]
Dim sTemp As String
 
sTreeFor =Each sTemp In RDir("/etc", "*gambas.d")
 
For Each sTemp In sTree
Print sTemp
Next
Line 873 ⟶ 871:
Output:
<pre>
sysctl.d
.....
systemd/ntp-units.d
usr/share/gambas3/gbs3.gambas
pam.d
usr/share/gambas3/gambas3.gambas
security/limits.d
usr/lib/gambas3/gb.report2.gambas
security/namespace.d
usr/lib/gambas3/gb.scanner.gambas
insserv.conf.d
udev/hwdb.d
....
</pre>
Anonymous user