[求助]数字匹配问题，这其中哪里错在哪里

bmechuangye

UID: 32886
帖子: 74
积分: 170
在线时间: 7 小时

1^# bmechuangye 发表于 2008-12-12 10:01

[求助]数字匹配问题，这其中哪里错在哪里

195,220 : 66,90 (-18.30 = -28.07 + 2.87 + 6.90)
我要分别提取上面的数字，分别为195，220，66，90，-18.30，-28.07，2.87，6.90，以下是我的处理，但没成功
$num=~/(\d+)\,(\d+)\\d+)\,(\d+)$([\-]\d+\.\d+)\=([\-]\d+\.\d+)\+([\-]\d+\.\d+)\+([\-]\d+\.\d+)$/
请问高手，这其中哪里错在哪里？Thank you advance!!

cobrawgl

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

2^# cobrawgl 发表于 2008-12-12 10:31

my @t = m/(-?[\d\.]+)/g;

wxlfh

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

3^# wxlfh 发表于 2008-12-12 12:13

[Copy to clipboard] [ - ]

CODE:

$text = '195,220 : 66,90 (-18.30 = -28.07 + 2.87 + 6.90)';
@list = ($text =~ /(-?\d+\.?\d+)/g);
foreach (@list) {
print "\t$_\n";
}

我这样的似乎也行的，输出

[Copy to clipboard] [ - ]

CODE:

195
220
66
90
-18.30
-28.07
2.87
6.90

bmechuangye

UID: 32886
帖子: 74
积分: 170
在线时间: 7 小时

4^# bmechuangye 发表于 2008-12-12 14:56

非常感谢wxlfh和cobrawgl二位的热心帮助！

adminsinx

UID: 18793
帖子: 56
积分: 128
在线时间: 4 小时

5^# adminsinx 发表于 2008-12-15 10:49

my @t = m/(-?[\d\.]+)/g;
初学者有点看不懂，能否解释一下？

bernana

UID: 9972
帖子: 188
积分: 432
在线时间: 2 天

6^# bernana 发表于 2008-12-15 14:02

QUOTE:

原帖由 adminsinx 于 2008-12-15 10:49 发表
my @t = m/(-?[\d\.]+)/g;
初学者有点看不懂，能否解释一下？

很简单，-?表示0个或者1个- , [\d\.]+表示一个或者多个数字或者. ，//g表示不停匹配知道字符结束。