redis01:/root# cat x2.pl
my $str="a19823a456123";
if ($str =~/a(.*)23/){print "1----".$1."\n";};
if ($str =~/a(.*?)23/){print "2----".$1."\n";};
redis01:/root# perl x2.pl
1----19823a4561
2----198本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。
