正規表現で最後の前にマッチした値を知るにはどうしたらいいですか？

m/pattern/; # ()がたくさん
print $+;　# 最後にマッチした値