>>-SysFileSearch(target,file,stem--+----------+--)------------->< +-,options-+
Example 8.11. RexxUtil - SysFilesearch
/* Find DEVICE statements in CONFIG.SYS */ call SysFileSearch "DEVICE", "C:\CONFIG.SYS", "file." do i=1 to file.0 say file.i end /* Output */ DEVICE=C:\SB16\DRV\CTSB16.SYS /UNIT=0 /BLASTER=A:240 I:5 D:1 H:5 DEVICE=C:\SB16\DRV\CTMMSYS.SYS rem **** DOS SCSI CDROM device drivers *** DEVICE=C:\SCSI\ASPI8DOS.SYS /D DEVICE=C:\SCSI\ASPICD.SYS /D:ASPICD0 rem **** IDE CDROM device drivers DEVICE=C:\DOS\HIMEM.SYS DEVICE=C:\SBCD\DRV\SBIDE.SYS /V /D:MSCD001 /P:1f0,14 DEVICE=C:\DOS\SETVER.EXE DEVICE=C:\WINDOWS\SMARTDRV.EXE /DOUBLE_BUFFER DEVICE=C:\WINDOWS\IFSHLP.SYS /* Find DEVICE statements in CONFIG.SYS (along with */ /* line numbers) */ call SysFileSearch "DEVICE", "C:\CONFIG.SYS", "file.", "N" do i=1 to file.0 say file.i end /* Output */ 1 DEVICE=C:\SB16\DRV\CTSB16.SYS /UNIT=0 /BLASTER=A:240 I:5 D:1 H:5 2 DEVICE=C:\SB16\DRV\CTMMSYS.SYS 4 rem **** DOS SCSI CDROM device drivers *** 5 DEVICE=C:\SCSI\ASPI8DOS.SYS /D 6 DEVICE=C:\SCSI\ASPICD.SYS /D:ASPICD0 8 rem **** IDE CDROM device drivers 9 DEVICE=C:\DOS\HIMEM.SYS 10 DEVICE=C:\SBCD\DRV\SBIDE.SYS /V /D:MSCD001 /P:1f0,14 13 DEVICE=C:\DOS\SETVER.EXE 16 DEVICE=C:\WINDOWS\SMARTDRV.EXE /DOUBLE_BUFFER 17 DEVICE=C:\WINDOWS\IFSHLP.SYS