求助：如何删除文件中的一行记录

wellshunan

比如我有一个文件：records.txt
里面有记录：

1. wells        23        male        提交       
   
2. monk        21        male        提交       
   
3. sherry        22        female        提交       
   
4. chihao        22        secret        提交       
   
5. alien        25        male        提交       
   
6. sky        20        secret        提交       

复制代码

如何才能删除其中的一行
比如： sky  20  secret  提交

ulmer

原帖由 wellshunan 于 2006-7-26 21:04 发表
比如我有一个文件：records.txt
里面有记录：

1. 
   
2. wells        23        male       
   
3. monk        21        male       
   
4. sherry        22        female       
   
5. chihao        22        secret       
   
6. alien        25        male       
   
7. sky        20        secret       
   

复制代码

如何 ...

simply type:
perl -ne 'print if ! /^sky/' records.txt

daafu

我曾经写过,采用的方法是将原来的文件改个名,然后将文件读出,如果不为特定的记录就写入新文件.比较笨啦

ulmer

原帖由 daafu 于 2006-7-26 22:09 发表
我曾经写过,采用的方法是将原来的文件改个名,然后将文件读出,如果不为特定的记录就写入新文件.比较笨啦

You are right?!
Why so many stupid programmer write many code to remove only one line in a file?!
Why not like you, just open file , delete such a line and save it again?!
zic, zac in second the work is finished !?
cool !!!!

victorxian

通常的做法是，把文件读取放到数组或其他的存储方式。查询到要删除的行，然后修改数组。最后将数组的数据写回文件。

vio

原帖由 ulmer 于 2006-7-26 21:12 发表

simply type:
perl -ne 'print if ! /^sky/' records.txt

1. perl -i -ne 'print if ! /^sky/' records.txt

复制代码

ubac

通常的做法是，把文件读取放到数组或其他的存储方式。查询到要删除的行，然后修改数组。最后将数组的数据写回文件。

如果你删除了数组中的一个元素，那么往文件中写入的时候就无法将原来的数据全部覆盖了
是否先将原文件清空？
还是先把原文件rename 然后再写入与原文件同名的文件中？


Best!

daafu

其实一样的.楼上的楼上意思是读入到数组:
@lines = <FILE>;
while ($line = pop @lines) {
    # do something with $line
}
然后再将原来的文件覆盖.

或者将原来的文件改名称;rename($Serched_name_File,$tempFileName);
然后将更改后的内容写入和原来的文件同名的文件.最后ulink改名的文件.

ubac

@lines = <FILE>;
while ($line = pop @lines) {
    # do something with $line
}
然后再将原来的文件覆盖.

比如原文件有10行，删除一行后剩9行了，如果去覆盖原文件的话
将有一行的信息是未知的。不知道是不是我考虑不周全，麻烦了！

daafu

不是的.确             open(OUT_File, "<$FileName") || die;
                   @lines = <OUT_File>;
这时原来文件所有的内容都在数组中了.可处理这个数组.然后把这个数组写到一个新文件,或覆盖写到原来的文件都可以了.