Thread Ersetzung eines Links mit Perl (23 answers)
Opened by lids at 2008-04-25 13:49

lids
 2008-04-29 15:47
#108998 #108998
User since
2008-04-22
15 Artikel
BenutzerIn
[default_avatar]
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.

View full thread Ersetzung eines Links mit Perl