perl中，怎么修改文件中的某一行啊

Qiang

改完后先保存到一个临时文件,然后 rename 就可以了.

另外,修改文件某一行的内容 在 perlfaq 里提到几个方法.

perldoc -q change one line  运行后翻一页就看到了.

用 seek 太繁琐, apile 所说的足够.  

@ary = <FH>;;  # 文件小还可以

或者

while (<F>

perl 里也有模块适合类似工作. Tie::File  省内存也很迅速. 大的文件也没有问题.

xiayaazinabu

tie:file 绝对一流, 他采用类似@ary = <FH>;的方法,但绝对
节约内存,傻瓜式操作,而且有很强大的扩展功能,
       perl的tie机制绝对是一种魔术.

deathcult

原帖由 "xiayaazinabu" 发表：
tie:file 绝对一流, 他采用类似@ary = <FH>;的方法,但绝对
节约内存,傻瓜式操作,而且有很强大的扩展功能,
       perl的tie机制绝对是一种魔术.

赞同楼上，特别是在处理文本数据库的时候 ：）

yoursmile

[quote]原帖由 "ronaldo1998"]现在的问题是rename对于mount过来的文件不好用，也就是说我不能在/mnt/XXX目录下面进行rename[/quote 发表：


那就mv

apile

你到/mnt/下
ls -al XXX
看一下..有沒有
drwxrw-rw-  
這樣的權限..
注意最後那三個文字 rw-
如果沒有 w..那你程式改完也沒有辦法存回去...
頂多只能read....
我猜你的問題在於權限問題..而非mount的問題....
如果others沒有write的權限...用root改吧..

另外..目錄檢查完了..再看看那個file有沒有打開w的權限...