[Perl]文字/代碼批量替換工具

2020-06-04 20:27:43

字體：大中小

來源：轉載

供稿：網友

Perl腳本batchReplace.pl可以用來批量替換文件中的文字/代碼。可在指定目錄中查找指定類型的文件，并遞歸檢查子目錄；在輸出文件時復制輸入文件的目錄結構。

[附件]Win32應用程序batchReplace.exe是由Perl腳本編譯產生的可執行程序，不需安裝Perl運行環境即可執行。

在命令行中使用

batchReplace.exe[ -i 輸入文件路徑（或包含文件的目錄）][ -o 輸出文件位置（文件或目錄）][ -c 批量輸入文件的擴展名，以“.”開始，多個擴展名之間以“|”隔開][ -m 匹配模式][ -I（忽略匹配內容的字母大小寫）][ -G（全局查找要匹配的內容）][ -e 例外的字符串，是對匹配模式的補充，如果在匹配結果中發現有這樣的字符串，做不匹配處理][ -r 替換的內容]

上述參數沒有順序限制。當 -o 參數所涉及的文件路徑不存在時，會自動創建。當輸出文件已經存在時，文件原有的內容將被覆蓋。（安全起見，請不要輸出到輸入文件的原始位置，以免造成不可恢復的損失。）

例如：
batchReplace.exe -i d:/gaoshu1 -o d:/do/123/456 -e http://www.blueidea.com/

通過配置文件 batchReplace.set 設置參數

配置文件中可包含以下設置項目（格式范例，注意大小寫）：

Input=E:/fna/                 指定輸入路徑，相當于命令行參數 -i 的默認值。
-i=E:/fna/                    同上。
Output=E:/dnaWalks/           指定輸出路徑，相當于命令行參數 -o 的默認值。
-o=E:/dnaWalks/               同上。
Match=<iframe[^>]*>[/s/S]*?<//iframe>  匹配模式，相當于命令行參數 -m 的默認值。
-m=<iframe[^>]*>[/s/S]*?<//iframe>  同上。
Insensitive                   忽略匹配內容的字母大小寫，相當于命令行參數 -I。
-I                            同上。
Global                        全局查找要匹配的內容，相當于命令行參數 -G。
-G                            同上。

上一篇：perl 刪除數組元素的幾種方法小結

下一篇：Shell編程的一些知識集合