免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1564 | 回复: 6

求助正则匹配 [复制链接]

论坛徽章:
0
发表于 2016-10-09 16:29 |显示全部楼层
本帖最后由 Eva326 于 2016-10-10 23:02 编辑

正在学习正则,遇到一个问题求指教:
假如字符串$a="aa,bb,cc,dd",如何匹配最后一个,号之前的内容,得到:$a="aa,bb,cc",
尝试$a=~m/(.*),/; 貌似不行,求大神指教!

####################
请教一个正则问题,
@11ww11_0001
222ww11_A002

如何匹配 _ 之前的字符?得到:
@11ww11
222ww11

论坛徽章:
307
程序设计版块每周发帖之星
日期:2016-04-08 00:41:33操作系统版块每日发帖之星
日期:2015-09-02 06:20:00每日论坛发贴之星
日期:2015-09-02 06:20:00程序设计版块每日发帖之星
日期:2015-09-04 06:20:00每日论坛发贴之星
日期:2015-09-04 06:20:00每周论坛发贴之星
日期:2015-09-06 22:22:00程序设计版块每日发帖之星
日期:2015-09-09 06:20:00程序设计版块每日发帖之星
日期:2015-09-19 06:20:00程序设计版块每日发帖之星
日期:2015-09-20 06:20:00每日论坛发贴之星
日期:2015-09-20 06:20:00程序设计版块每日发帖之星
日期:2015-09-22 06:20:00程序设计版块每日发帖之星
日期:2015-09-24 06:20:00
发表于 2016-10-09 16:34 |显示全部楼层
  1. m/[^_]+/
复制代码

论坛徽章:
0
发表于 2016-10-09 18:09 |显示全部楼层
回复 2# sunzhiguolu

好像不行 全部匹配了

论坛徽章:
307
程序设计版块每周发帖之星
日期:2016-04-08 00:41:33操作系统版块每日发帖之星
日期:2015-09-02 06:20:00每日论坛发贴之星
日期:2015-09-02 06:20:00程序设计版块每日发帖之星
日期:2015-09-04 06:20:00每日论坛发贴之星
日期:2015-09-04 06:20:00每周论坛发贴之星
日期:2015-09-06 22:22:00程序设计版块每日发帖之星
日期:2015-09-09 06:20:00程序设计版块每日发帖之星
日期:2015-09-19 06:20:00程序设计版块每日发帖之星
日期:2015-09-20 06:20:00每日论坛发贴之星
日期:2015-09-20 06:20:00程序设计版块每日发帖之星
日期:2015-09-22 06:20:00程序设计版块每日发帖之星
日期:2015-09-24 06:20:00
发表于 2016-10-09 18:34 |显示全部楼层
本帖最后由 sunzhiguolu 于 2016-10-09 18:37 编辑

回复 3# Eva326
具体说下原因以及你的需求是啥?

方便的话, 提供下你的代码. 可能没有理解你的意思.

论坛徽章:
0
发表于 2016-10-09 21:24 |显示全部楼层
回复 4# sunzhiguolu


  1. my $a = "@11ww11_0001";
  2. $a =~ m/[^_]+/;
  3. print $a;
复制代码

真是奇怪了,输出还是:@11ww11_0001

论坛徽章:
1
15-16赛季CBA联赛之新疆
日期:2017-03-09 12:33:45
发表于 2016-10-10 09:46 |显示全部楼层
  1. #! perl -w
  2. use strict;

  3. while(<DATA>){
  4.         my ($l) = $_;
  5.         chomp($l);
  6.         if ($l =~ m/^([^_]+)_/) {
  7.                 print "find ".$1."\n";
  8.         }
  9. }



  10. __DATA__
  11. @11ww11_0001
  12. 222ww11_A002
复制代码

回复 1# Eva326


论坛徽章:
307
程序设计版块每周发帖之星
日期:2016-04-08 00:41:33操作系统版块每日发帖之星
日期:2015-09-02 06:20:00每日论坛发贴之星
日期:2015-09-02 06:20:00程序设计版块每日发帖之星
日期:2015-09-04 06:20:00每日论坛发贴之星
日期:2015-09-04 06:20:00每周论坛发贴之星
日期:2015-09-06 22:22:00程序设计版块每日发帖之星
日期:2015-09-09 06:20:00程序设计版块每日发帖之星
日期:2015-09-19 06:20:00程序设计版块每日发帖之星
日期:2015-09-20 06:20:00每日论坛发贴之星
日期:2015-09-20 06:20:00程序设计版块每日发帖之星
日期:2015-09-22 06:20:00程序设计版块每日发帖之星
日期:2015-09-24 06:20:00
发表于 2016-10-10 12:24 |显示全部楼层
回复 5# Eva326
如果希望输出匹配到的内容, 在正则表达式的外围添加一对括号 使其成为一个分组. 之后便能在表达式的外面利用分组变量读取正则表达式捕获到的文本了.
if ($a =~ m/([^_]+)/){
   print $1; #数字 1 对应第一个捕获分组的编号
}



您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP