Globally replace text in several files: Difference between revisions

Content added Content deleted
m (→‎Version 2: minor refinements)
(Added Vedit macro language)
Line 981: Line 981:
txr: could not open foo.txt.tmp (error 13/Permission denied)
txr: could not open foo.txt.tmp (error 13/Permission denied)
false</pre>
false</pre>

=={{header|Vedit macro language}}==
The list of files is in file "files.lst" which is expected to be in current directory.
<lang vedit>File_Open("files.lst") // list of files to process
#10 = Buf_Num // #10 = buffer for file list
#11 = Buf_Free // #11 = buffer for file to be processed
#20 = Reg_Free // #20 = Text register for filename

While(!At_EOF) {
Reg_Copy_Block(#20, Cur_Pos, EOL_Pos) // get next filename
Buf_Switch(#11)
File_Open(@(#20))
Replace("Goodbye London!", "Hello New York!", BEGIN+ALL+NOERR)
File_Close(NOMSG)
Buf_Switch(#10)
Line(1, ERRBREAK)
}

Buf_Quit(OK) // Cleanup
Buf_Switch(#11)
Buf_Quit(OK)
Reg_Empty(#20)</lang>


=={{header|XPL0}}==
=={{header|XPL0}}==