Select Code to Download

use URI;
my $my_url = 'http://www.perlmonks.org:8080/index.pl?whatever';
my $uri = URI->new($my_url);
my $host = $uri->host();

use URI;
my $host = URI->new('http://www.perlmonks.org:8080/index.pl?whatever')
+->host;