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);