perl 怎么将匹配的字符提取出来

xsm5315798 · 发表于 2013-11-28 09:59:36

您需要登录才可以下载或查看，没有账号？注册

x

比如有个变量$var，里面存了一段字符和数字，现在想将其中%之前的非空格数字提取出来存在变量$result中，要怎么实现？

xsm5315798 · 发表于 2013-11-28 10:01:59

补充一下，32234 84%比如像这样，我想提取84

adanshen · 发表于 2013-11-28 13:42:02

$text=84%
$text=~($1)\%
print ("$1")

xsm5315798 · 发表于 2013-11-28 14:02:50

谢谢楼上，不过  $text=~($1)\% 应该有点不对吧，$1应该是个匹配模式吧，
自己弄了个，跑通了
  if ($var=~ /\s(\d\d)\%/){
      $result=$1;
}

[求助] perl 怎么将匹配的字符提取出来