use Data::Dumper;
use URI;

use strict;
use warnings;

my $base_url = "http://www.abc.com/";
my @links = qw/a b c/;

for my $index (0 .. $#links) { 
	$links[$index] = URI->new_abs($links[$index], $base_url)->as_string;
}
print Dumper(\@links);

##</code><code>##

use Data::Dumper;
use URI;

use strict;
use warnings;

my $base_url = "http://www.abc.com/";
my @links = qw/a b c/;

@links = map {URI->new_abs($_, $base_url)->as_string()} @links;
print Dumper(\@links);

##</code><code>##

$VAR1 = [
          'http://www.abc.com/a',
          'http://www.abc.com/b',
          'http://www.abc.com/c'
        ];