perl的贪婪和非贪婪模式

#!/usr/bin/perl
$string="guoshun is a good shun a  good";
$string=~m/guoshun(.+?)good/;#默认的是贪心匹配   用？将贪心匹配变成非贪心匹配  所以输出的结果就是  is a
print "$1\n";
$string=~/guoshun(.+)good/;
print "$1\n";#非贪心匹配  默认的就是非贪心匹配   所以匹配到的就是   is a good shun  a