perl - 如何从 URL 中提取域？

Question

如何从 URL 中提取域？有 Perl 模块吗？我找不到任何东西。

Answer 1

URI模块可以以一种很好的面向对象的方式为您解析 URI。要获取域部分:

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