Perl使ってます。
htmlのaタグに囲まれた文字、それとa閉じタグ以降の文字、を抽出したいのですが

例:<a href="http://hogehoge.com">aiueo</a>&nbsp;|
抽出後:aiueo&nbsp;|

のような感じです。
で、正規表現として「s/<a.*?>(.*?)</a>(.*?)/i」と書いたのですが、
aタグに囲まれたのは$1に入りましたが、a閉じタグ以降の文字が$2に入ってないんです。
どう書いたらよいのでしょうか?