怎样从一字符串中取得数字部分

nbaloverme

1^# nbaloverme 发表于 2008-10-14 11:54

如题，现有一字符串如下所示：

QUOTE:

<li>kaipan:<cite class="up">15156.16</cite></li>

需要取得数字部分15156.16
怎么做呢
谢谢

fayland

2^# fayland 发表于 2008-10-14 13:11

my ($num) = (qq~<li>kaipan:<cite class="up">15156.16</cite></li>~ =~ /([\d\.]+)/);
print $num;

nbaloverme

3^# nbaloverme 发表于 2008-10-14 14:12

谢谢