求助perl 替换文件中某一行的内容

youngbit007

怎么能替换文件中某一行的内容，比如说用***替换文件中第十行的内容，
哪位大侠能给个详细点的代码，谢谢~~~

Cu_fans

晕，都已经给你回了。。就是 不看下，还要连发三帖

youngbit007

好的，谢谢楼上已经搞定，不过我是用的本方法，把文件读到数组里然后覆盖以前的文件~~

sjdy521

1. $^I="";
   
2. while(<>){
   
3.     s/.*/***/ if $.=10;
   
4.     print;
   
5. }

复制代码

使用方法
./script.pl filename
注意，这个是直接在原文件上修改，注意备份！

bikong0411

perl -npe 's/.*/***/ if $.==10'  urfile

南宫慕容007

哈哈回复 2# Cu_fans