免费注册 查看新帖 |

Chinaunix

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

perl 和 c shell的对比 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2012-06-22 13:34 |只看该作者 |倒序浏览
把windows的换行符^M去掉.

c shell只要两行:
sed 's/^M//g' < 1.txt > 3.txt
mv 3.txt 1.txt


perl:
open ONE,"> 3.txt";
open TWO,"d:/1.txt";
while(<TWO>){
s/\^M//g;
print ONE;
}
close ONE;
close TWO;
system"mv 3.txt 1.txt";

看到这样的情况是不是很纠结。
有没有更好的办法呢?

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
2 [报告]
发表于 2012-06-22 13:55 |只看该作者
哈哈
你这Perl写的必须老纠结了
搜搜“perl one liners”

论坛徽章:
1
CU十二周年纪念徽章
日期:2013-10-24 15:41:34
3 [报告]
发表于 2012-06-22 15:30 |只看该作者
sed和perl都有-i选项,一行足够。

论坛徽章:
145
技术图书徽章
日期:2013-10-01 15:32:13戌狗
日期:2013-10-25 13:31:35金牛座
日期:2013-11-04 16:22:07子鼠
日期:2013-11-18 18:48:57白羊座
日期:2013-11-29 10:09:11狮子座
日期:2013-12-12 09:57:42白羊座
日期:2013-12-24 16:24:46辰龙
日期:2014-01-08 15:26:12技术图书徽章
日期:2014-01-17 13:24:40巳蛇
日期:2014-02-18 14:32:59未羊
日期:2014-02-20 14:12:13白羊座
日期:2014-02-26 12:06:59
4 [报告]
发表于 2012-06-22 16:35 |只看该作者
回复 1# 睫毛上的雾

dos2unix
   

论坛徽章:
0
5 [报告]
发表于 2012-06-22 16:56 |只看该作者
  1. perl -pe 's/\^M//g' < 1.txt > 3.txt
  2. mv 3.txt 1.txt
复制代码
学了perl之后,把sed和awk什么的全部扔掉吧,它们弱爆了。。。

论坛徽章:
1
狮子座
日期:2013-12-16 16:09:24
6 [报告]
发表于 2012-06-22 18:28 |只看该作者
sed awk 弱爆了。。。
btw,不知道楼主用的是什么shell,bash 还是csh 还是ksh,还是zsh,sh,他们的语法一样么。linux还是bsd,几种组合的语法一致么?
shell编程乘早扔了吧。。。

论坛徽章:
0
7
发表于 2012-06-22 22:07
回复 2# py


    one line 我知道啊,但是要写在脚本里面的。好像就不能用oneline吧

论坛徽章:
0
8
发表于 2012-06-22 22:08
回复 6# ttcn_cu


    扔了很久了

论坛徽章:
0
9 [报告]
发表于 2012-06-22 22:09 |只看该作者
回复 4# jason680


    windows下没有这个命令

论坛徽章:
0
10 [报告]
发表于 2012-06-22 22:10 |只看该作者
回复 5# kidaaaa


    这个早就试过了,单行运行没有问题,但写在脚本里就报错了
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP