作者lalelee (找我玩五子棋)
看板Perl
标题[问题] 搜寻与取代更改档案内容
时间Tue Feb 26 16:10:42 2008
情境 : a 里有某些内容我想要替换掉
code 如下 :
open FILE,"a";
open INPUT,">b";
while<FILE>
{
s/要替换的内容/更改过後的内容/ ;
print INPUT $_;
}
close INPUT;
close FILE;
我可不可以直接更改a的内容,而不需再另开一个b写入更改过後的内容??
谢谢大家~
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 211.22.62.40
1F:→ airkiss:get A file data into memory to replace it,then save it 02/26 17:27
2F:→ clkao:man perlrun, look for -p and -i 02/26 19:00
3F:→ Chris7462:$^I <--可以查查看这个参数,我记得它好像可以直接改 a 02/26 20:36
4F:→ Chris7462:还会顺便帮你备份 02/26 20:37
5F:推 superdog:推$^I!! 02/29 10:14
6F:推 HWOARANG:perl -pi.bak -e 's/before/after' a.txt 02/29 21:08
7F:→ HWOARANG:不要备份.bak可以去掉 02/29 21:11
8F:→ HWOARANG:perl -pi.bak -e 's/before/after/' a.txt 刚少一个 / 02/29 21:12
9F:→ lalelee:上面这个实验後无法work~ 再加一个print也是一样 03/04 12:13