my $text = 'Irgendwas anderes';
my $string = "irgendein text http://test.example _wort_ noch was";
$string =~ s!(http://.*?)\s!<a href="$1" class="link" target="_blank">$text</a> !g;

print $string;