+ -
当前位置:首页 → 问答吧 → 弱智的perl取值问题,请大家帮忙

弱智的perl取值问题,请大家帮忙

时间:2010-11-30

来源:互联网

test=123
我想用perl取以等号分隔符后面的123的值
先谢了

作者: ybbdnvjfd   发布时间: 2010-11-30

正则你懂的吧。。。。

作者: wfnh   发布时间: 2010-11-30

#!/usr/bin/perl
$str="test=123";
$str=~/=(\d+)/;
print $1;

作者: 小鹭   发布时间: 2010-11-30

本帖最后由 wxlfh 于 2010-11-30 14:41 编辑
  1. my $str = "test=123";
  2. $str =~ /=(.+)$/;
  3. print $1;        #现在$1中就是你想要的
复制代码
或者
  1. my $substr = (split /=/, $str)[1];
复制代码
这里都有个Bug,字符串里面有且只能有一个 '=' 。

作者: wxlfh   发布时间: 2010-11-30

回复 ybbdnvjfd


     echo test=123 |perl -F'=' -nae 'print $F[1]'

作者: wtuter   发布时间: 2010-11-30

热门下载

更多