perl正则匹配结果保存

tanos

UID: 15760
帖子: 80
积分: 184
在线时间: 9 小时

1^# tanos 发表于 2008-08-27 14:57

perl正则匹配结果保存

有一个很大的字符串，格式类似如下：

a=string1&b=1,2&....a=string2&b=1,3&....

现在想用正则表达式把a的值string1，string2和b的值1，2和1，3等取出来，应该如何处理？

PHP中有preg_match_all将他们保存到一个数组中，perl应该如何做？谢谢

不死草

UID: 35536
帖子: 142
积分: 326
在线时间: 1 天 3 小时

2^# 不死草发表于 2008-08-27 15:10

取b的值倒是比较简单，可以直接使用“&”和split，然后匹配"b="就可以了；
如果是取a的值，可能有一个复杂的办法，首先使用“a=”和split,然后取所有的"&b="前面的内容就可以了。
方法可能不是最好的，但是能解决问题。

tanos

UID: 15760
帖子: 80
积分: 184
在线时间: 9 小时

3^# tanos 发表于 2008-08-27 15:16

谢谢楼上的，关键是如何把每个值都保存下来？

比如a的值为string1或者string2或者其他的，如何把每个值都分别保存下来？

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

4^# flw 发表于 2008-08-27 15:22

use CGI;

tanos

UID: 15760
帖子: 80
积分: 184
在线时间: 9 小时

5^# tanos 发表于 2008-08-27 15:30

版主能说详细一点吗？谢谢

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

6^# flw 发表于 2008-08-27 15:37

QUOTE:

原帖由 tanos 于 2008-8-27 15:30 发表
版主能说详细一点吗？谢谢

http://search.cpan.org/~lds/CGI.pm-3.41/CGI.pm

forlorngenius

UID: 32353
帖子: 42
积分: 96
在线时间: 2 小时

7^# forlorngenius 发表于 2008-08-27 17:19

哈哈，还是flw看出你的问题。以后先说清你的问题

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

8^# cobrawgl 发表于 2008-08-27 19:02

还是斑竹牛，一眼看穿了他的外衣

forlorngenius

UID: 32353
帖子: 42
积分: 96
在线时间: 2 小时

9^# forlorngenius 发表于 2008-08-27 20:12

水啊

zzyong08

UID: 19033
帖子: 9
积分: 20
在线时间: 10 分钟

10^# zzyong08 发表于 2008-08-28 10:59

#!/usr/bin/perl

my $str = qq|a=string1&b=1,2&a=string2&b=1,3&a=string3&b=1,4|;
while($str =~ /([ab])=([^&]+)/g){
      print $1,"\t",$2,"\n";
}

输出:
a    string1
b    1,2
a    string2
b    1,3
a    string3
b    1,4

不知道是不是你想要的.