如何从字符串中取出多组数字

MicoCN

请各位高手帮帮忙，下面的字符串，我想从中取出 0.000000， 10.000000 和 mA， 并分别把他们给3个变量，有什么简单的办法没有。。

我用Split然后一个个查找貌似有点复杂。

1. Pass/Fail Limits: [ 0.000000 mA,     10.000000 mA]

复制代码

10.000000 mA]

kiwivip

($min,$max,$unit) = $yours =~ /\[([\d\.]+).*?,\s+([\d\.]+) (.*?)]/ ;)

mcshell

回复 1# MicoCN

1. my $str='Pass/Fail Limits: [ 0.000000 mA,     10.000000 mA]';
   
2. $str=~/([\d\.]+)\s*(\w+)[^\d]+([\d\.]+)\s*\2(?{print "$1 $2 $3"})/;

复制代码

kernel69

(?{print "$1 $2 $3"})，这段不太明白，请教一下，代码中问号是什么意思，为什么用又用圆括号把?{print "$1 $2 $3"}括起来？{}是再开一个进程？
回复 3# mcshell


   

MicoCN

kiwivip 发表于 2013-01-07 15:09
($min,$max,$unit) = $yours =~ /\[([\d\.]+).*?,\s+([\d\.]+) (.*?)]/ ;

这段没看懂，能给解释下不？？ 谢谢。

mcshell

回复 4# kernel69

http://perldoc.perl.org/perlre.htm
搜索

1. (?{ code })

复制代码

MicoCN

mcshell 发表于 2013-01-07 15:13
回复 1# MicoCN

谢谢，这个可用，但还有后续问题，哎，慢慢学学先。。

jiang870320

my $str='Pass/Fail Limits: [ 0.000000 mA,     10.000000 mA]';
$str=~/([\d\.]+)\s*(\w+),\s*([\d\.]+)\w*/;
{print "$1 $2 $3"};

kernel69

谢谢，我先啃啃E文
回复 6# mcshell