perl怎么只保留第一次匹配到的内容
perl如何只保留第一次匹配到的内容比如 $line abc_123_strif($line ~ /(.*)_(.*)/)会将abc_123放在$1
perl如何只保留第一次匹配到的内容
比如 $line = "abc_123_str"
if($line =~ /(.*)_(.*)/)
会将abc_123放在$1中，但是我只想要abc，怎么办
[解决办法]
$line =~ /(.*?)_(.*)/
[解决办法]匹配优先量词：*、+、?、{ m, n }
忽略优先量词：*?、+?、??、{ m, n }?
占有优先量词：*+、++、?+、{ m, n }+
[解决办法]$line =~ m/(.*)_(.*_)+/;
