das ist ein Testtext zu print |
das ist ein Testtext zu <a href="entsprechende-seit.htm">print</a>. |
$ersetzwort='print'; $ersetzwoerter{print}='http://www.sonstwas.de'; $_=~ s/([^<]*.*?\W)($ersetzwort)(\W)(.*?)([^>])/\1<a href=\"$ersetzwoerter{$ersetzwort}\">\2<\/a>\3\4\5/; $zeile=~ s/^($ersetzwort)([^\w])/<a href=\"$ersetzwoerter{$ersetzwort}\" class=\"linkunterstrichen\"> \1<\/a>\2/gis; |