my $zusatz="http://www.testit.de/test.pdf _blablub_";

my $format = $zusatz =~ m/\.pdf/ ? 'pdf' : 'html';
$zusatz =~ m!(http://.*?)\s_(.*?)_!g;

print '
<table>
  <tr>
    <td width="33"><img src="graphics/'.$format.'_icon.gif"></td>
    <td class="text">'.$2.'
      <a href="'.$1.'" target="_blank">Datei im '.$format.'-Format</a>
    </td>
  </tr>
</table>
';

if ($zusatz =~ m/\.pdf$/) {
  print "<table><tr><td> ....<a target='...' href='";
  print $zusatz;
  print "'><img src='pdficon.gif'>PDF-Link</a>.....</table>";
} else {
  print "<a href='". $zusatz . "'>HTML-Link</a>";
}