免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
› 论坛 › 程序设计 › Perl › 请教：如何用perl直接编辑文本
最近访问板块 发新帖
查看: 2081 | 回复: 2
打印 上一主题 下一主题

请教：如何用perl直接编辑文本 [复制链接]

iuytr123

论坛徽章:
0
跳转到指定楼层
1楼 [收藏(0)] [报告]
发表于 2010-11-11 20:05 |只看该作者 |倒序浏览
这可能是个比较笨的问题，请各位不要见笑。

我发现perl没法直接修改文本的内容。我每次都是把要修改的文本一行行读入，替换后写入另一个文件，然后删掉旧文件，把新生成的文件rename回来。。我是希望能像awk那样直接改的，但perl好像不行，或者是我没用对方法，请各位指教，谢谢
  1. while(<FILE>)
  2. {
  3.     s///;
  4.     ......
  5. }
复制代码
zhlong8

论坛徽章:
46
15-16赛季CBA联赛之四川 日期:2018-03-27 11:59:132015年亚洲杯之沙特阿拉伯 日期:2015-04-11 17:31:45天蝎座 日期:2015-03-25 16:56:49双鱼座 日期:2015-03-25 16:56:30摩羯座 日期:2015-03-25 16:56:09巳蛇 日期:2015-03-25 16:55:30卯兔 日期:2015-03-25 16:54:29子鼠 日期:2015-03-25 16:53:59申猴 日期:2015-03-25 16:53:29寅虎 日期:2015-03-25 16:52:29羊年新春福章 日期:2015-03-25 16:51:212015亚冠之布里斯班狮吼 日期:2015-07-13 10:44:56
2楼 [报告]
发表于 2010-11-11 20:16 |只看该作者
本帖最后由 zhlong8 于 2010-11-11 20:26 编辑
  1. perl -i.bak -pe "s///" testfile
复制代码
可以去看下 perlrun 的 -i 选项，就是为了解决这个问题的。注意要加上 -p
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
iuytr123

论坛徽章:
0
3楼 [报告]
发表于 2010-11-11 21:09 |只看该作者
嗯，好。多谢了
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP