免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1798 | 回复: 3
打印 上一主题 下一主题

求助更新多个文件 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2011-05-09 11:36 |只看该作者 |倒序浏览
我想更新多个文件,文件名与修改前相同。perl有$^I=“.bak”可以实现这个功能。
但是现在,由于我对单个文件的替换需要跨行,三种情况需要对整个文件读入后才能处理。所以,我写了如下代码:
while(<>) {
$lines.=$_;
}
然后再对$lines进行匹配替换。
if(//) {
}
if(//){
}
if(//){
}

现在的问题是我如何才能更新多个文件,文件名与修改前相同。
我不知道把print放在什么地方才能实现我想要的功能。
或者哪位仁兄给提供个其他的解决方案。
先谢谢各位了!

论坛徽章:
0
2 [报告]
发表于 2011-05-09 13:17 |只看该作者
本帖最后由 rettylee 于 2011-05-09 13:54 编辑

路过的大侠指点下啊。如何在多行替换中也能实现bak的效果啊。

论坛徽章:
1
狮子座
日期:2013-12-16 16:09:24
3 [报告]
发表于 2011-05-09 14:01 |只看该作者
先备份所有文件

自己遍历目录
操作前把文件复制一份,名为  xxx.bak,读模式打开
写模式打开原名字文件
遍历行,写入

论坛徽章:
0
4 [报告]
发表于 2011-05-09 15:51 |只看该作者
先备份所有文件

自己遍历目录
操作前把文件复制一份,名为  xxx.bak,读模式打开
写模式打开原名字文件 ...
ttcn_cu 发表于 2011-05-09 14:01



我用你这种方法试试,听起来应该是可以的。是不是$^I只能用在逐行处理的模式下才能自动备份?
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP