如何从URL中提取域名？

Question

如何从网址中提取域名？有Perl模块吗？我找不到任何。

Answer 1

URI模块可以以一种漂亮的OO-ish方式为您解析URI。获取域名部分：

my $url = URI->new( "http://www.stackoverflow.com/" );
my $domain = $url->host;
print $domain;

Answer 2

也许是Regexp::Common:URI？

更新：URI正如friedo建议听起来更好听吗？