Chinaunix首页 | 论坛 | 博客
  • 博客访问: 2313828
  • 博文数量: 527
  • 博客积分: 10343
  • 博客等级: 上将
  • 技术积分: 5565
  • 用 户 组: 普通用户
  • 注册时间: 2005-07-26 23:05
文章分类

全部博文(527)

文章存档

2014年(4)

2012年(13)

2011年(19)

2010年(91)

2009年(136)

2008年(142)

2007年(80)

2006年(29)

2005年(13)

我的朋友

分类: WINDOWS

2008-05-28 16:05:22

查看包含特定注释的CVS 某个版本:
cvs log *.cpp | perl -e 'undef $/;$a=<>;print "$&\n" if ($a =~ /^revision(?:.(?!^revision))*?XXXX.*?---+$/sm'
其中"特定注释"为XXXX, -------是一个CVS log命令输出的分隔行. 分隔各个不同revision的信息.

本来用支持PCRE功能的 grep :
cvs log *.cpp | grep -P '(?sm)revision(?:.(?!revision))*?XXXX.*?----+$'

这在linux上grep 2.5.1 版本也能工作, 但在cygwin 的grep, 同样是2.5.1 版本上却不能匹配任何内容.

通过md5sum 验证在 windows + cygwin上和linux上输入文件绝对一致的情况下测试过.

所以grep -P 功能是不那么可靠的.

另外发现 linux 上 2.5.1 版本的grep 也并非固若金汤,
下面的简单正则表达式可以通过:
 echo asdf | grep -P '(.)*'
输出是asdf
但是:
 echo asdf | grep -P '(?s)(.)*'
得到的却是
Segmentation fault

相比较而言, 使用perl的唯一原因就在于它的正则表达式支持一直处于世界最先进水平.
阅读(963) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~