读书人

perl怎么自动修改文件内容

发布时间: 2012-02-06 15:52:44 作者: rapoo

perl如何自动修改文件内容?
我准备写一个程序,对文件对应的行要进行修改。用字符串替换,出错说“不能替换”。请高手赐教有什么更好的方法?代码如下:
!/usr/bin/perl
open(filehandle,"</home/66.tpl");
!/usr/bin/perl
open(filehandle,"</home/66.tpl");
while($linename=<filehandle>)
{
if($linename=~m/00:FF:00:FF:00:FF/)
{
print "00:FF:00:FF:00:FF in the file!\n";
}
print $linename
}
close(filehandle);


[解决办法]
汗……那就接分啦。

是不是把m///换成s///?

读书人网 >perl python

热点推荐