论坛 › Erlang › 【小工具】对当前目前的所有文件内容批量替换

shijiang1130 发表于 2015-03-06 10:57

【小工具】对当前目前的所有文件内容批量替换

-module(tools).
-compile(export_all).

r()->
L=filelib:wildcard("*.log"),
lists:foreach(fun(F)->
        C=do(F),
        N=filename:basename(F,".log"),
        file:write_file(N,C)
end
,L).

do(F)->
{ok,A}=file:read_file(F),
B=re:replace(A, "\\S+ -org1", "XXX -ph", ),
C=re:replace(B, " org2\\S+", " community XXX", ),
C.
   

itclean 发表于 2015-03-06 22:03

查看完整版本: 【小工具】对当前目前的所有文件内容批量替换