免费注册 查看新帖 |

Chinaunix

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

求助:正则表达式匹配时,$1,$2等变量的作用范围问题 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2008-10-21 14:03 |只看该作者 |倒序浏览
现在遇到一个问题,前面用正则表达式匹配,然后调用全局变量$1,$2取得想要的值,但是后面再取其它的值时,用同样的方法,但是$1,$2的值还是上面一个操作的值,代码如下:

  1. foreach $recip(@Recipients){
  2.         $recip=~ /<.*@(.*)>/;
  3.         my $domain_to =$1;               #此处利用$1取得邮件地址的域名部分
  4.         my $localdomain="local_domain";
  5.         my $sign='signed';
  6.         if($domain_to !~ $localdomain)
  7.         {
  8.             my $file="./HEADERS";
  9.             open (FILE,$file) or die "Connot open $!";
  10.             while(<FILE>){
  11.                 $msg_id=(split(/:/,$_))[1] if(/Message-ID:/);
  12.                 $refers=(split(/:/,$_))[1] if(/References:/);
  13.                 }
  14.             close FILE;
  15.             if($refers !~ /$sign/)
  16.                 {
  17.                 $msg_id =~/<(.*)@ (.*)>/;
  18.                 my $ch_id=$1.$sign.$2;                      #此处的$1的值还是上面那个操作时的值,邮件地址的域名部分
  19.                 action_change_header("Message-ID", "$ch_id");
  20.                  }
  21.           }

复制代码


搞不懂是什么原因?

论坛徽章:
0
2 [报告]
发表于 2008-10-21 14:14 |只看该作者
哎,晚上回家面壁去,犯了个这么低级的错误:

  1. $msg_id =~/<(.*)@ (.*)>/;
  2. my $ch_id=$1.$sign.$2;   
复制代码


正则表达式匹配时,“@”和(.*)中间多了一个空格,我的终端字体设置有问题,竟然没看出来,发完帖子一看才看出来,
其实发生这样的情况一推断就出来了,$*的什没变,说明匹配没有成功,就从匹配方面找问题就行了,下次吸取教训。。。

论坛徽章:
0
3 [报告]
发表于 2008-10-21 23:43 |只看该作者
一般说来,正则表达式里面出现的$、@、% 这几个符号都需要转义一下的。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP