Thread Ersetzung eines Links mit Perl
(23 answers)
Opened by lids at 2008-04-25 13:49 Code (perl): (dl
)
1 2 3 4 5 6 7 if ($zusatz =~ m/\.pdf$/) { print "<a target='_blank' href='"; print $zusatz; print "'><img src='pdficon.gif'>PDF-Link</a>"; } else { print "<a href='". $zusatz . "'>HTML-Link</a>"; } Da wird aber nichts richtig als Link generiert. Wie muss ich $zusatz vorher definieren? Ich spreche das nämlich später in einem Script an, wo dann $zusatz eingebaut wird. |