This should do it...
my $link_db = $DB->table ('Links');
$link_db->select_options ('ORDER BY ID DESC', 'LIMIT 6');
my $links = $link_db->select('DISTINCT(Title)', 'ID', { isNew => "Yes", isValidated => "Yes" } )->fetchall_arrayref;
return join ("<br>", map { qq|<a href="$CFG->{db_cgi_url}/ppc_jump.cgi?ID=$_->[1]">$_->[0]</a>| }@$links);
}
Code:
sub { my $link_db = $DB->table ('Links');
$link_db->select_options ('ORDER BY ID DESC', 'LIMIT 6');
my $links = $link_db->select('DISTINCT(Title)', 'ID', { isNew => "Yes", isValidated => "Yes" } )->fetchall_arrayref;
return join ("<br>", map { qq|<a href="$CFG->{db_cgi_url}/ppc_jump.cgi?ID=$_->[1]">$_->[0]</a>| }@$links);
}