windows - 如何替换文件中的随机 IP 地址(Perl、Windows)

Question

如何使用 Windows Perl 替换 TXT 文件中的随机(未知)IP 地址？(不幸的是，我只找到了主要针对 Linux/sed 的解决方案)

我的文本文件包含 FTP 命令，只包含一个 IP 地址:

open ftp://user:password@123.123.123.123
cd c:/temp
mkdir newdir

等等

我试过了，但没有任何改变。

perl -pe s/[0-9]\{1,3\}.[0-9]\{1,3\}.[0-9]\{1,3\}.[0-9]\{1,3\}/10.10.111.222/g FtpCommands.txt > FtpCommands_mod.txt

谢谢!

Answer 1

如果您的文件具有 IPv4 地址，请使用 Regexp::Common模块使它成为一个简单的单行代码:

perl -MRegexp::Common=net -pe "s/$RE{net}{IPv4}/10.10.111.222/" FtpCommands.txt > FtpCommands_mod.txt