in reply to How do you extract the server from a URL?

use the URI Module 

my $url = URI->new( "http://www.perlmonks.org/index.pl" );
my $domain = $url->host;
print $domain;

[download]

Originally posted as a Categorized Answer.

In Section Seekers of Perl Wisdom