How to extract the full URL from a relative link using WWW:: Mecha nize

[Rajesh Dorairajan]

I am using WWW::Mechanize to create a configuration file from a website and
my script needs to go through a web-page and copy a specific links into a
configuration file. I am using $m->links method that returns the list of
links from a page. However, I am not able to get the fully qualified URL
such as http://www.domain.com/dir1/dir12/file1.html. Instead I get
/dir1/dir12/file.html. Please forgive me if this doesn't make sense. I am
giving the code below for more clarity:

my $obj = WWW::Mechanize->new();
my $url = "http://www.domain.com/dir1";;
.
.

for my $link ( @links ) {
    my $url = $link->url;
    $obj->get ( $url );
    my @urls = $obj->links;
    
    
    $obj->get( $urls[1]->url, ":content_file"=>"$dir/tmp/tmpfile.cert" );
    .
    .

    print CRL "[INPUT_SECTION_$count]\n";
    print CRL "LOCATION=".$urls[2]->url."\n\n"; #This is where I need the
fully qualified URL instead of the relative URL that I get currently
    $count++;
}

I looked up a lot on the web before sending this mail. I am not able to find
any documentation that points to this. Any help will be deeply appreciated.

Rajesh Dorairajan