Perl – How to extract the domain out of an URL

perl

How do I extract the domain out of an URL? Is there a Perl Module? I could not find any.

The URI module can parse URIs for you in a nice OO-ish way. To get the domain part:

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

You can use the perl debugger on a trivial program, like so:

perl -de1

Alternatively there's Alexis Sukrieh's Perl Console application, but I haven't used it.

Oh, I found it. You use last instead of break

for my $entry (@array){
    if ($string eq "text"){
         last;
    }
}