http://hogehoge.com/hogehoge.htmlのhogehoge.comの部分を抽出する正規表現を書きました。

$url = 'http://hogehoge.com/hoge.html';
$serverName = ($url =~ m(http://(.*?)(/|$)))[0];

このコードを別の書き方で書けないでしょうか？
$)が何かの変数だと解釈されてしまい以下のインデントがずれてしまいます。