nicht angemeldet
Hallo Thomas!
Schau Dir mal das Kapitel über "Reguläre Ausdrücke mit Alternativen" an:
<../../tgcg.htm#a5>
Benutze nun die JOIN-Funktion, um Deine Liste (@liste) mit zu verbinden und in den Skalar $suchalternativen zu schreiben.
Mit der Anweisung
if ($suchstring =~ /$suchalternativen/ )
kannst Du nun prüfen, ob eines der Worte in dem $suchstring vorkommt.
Problematik: Wenn jemand bei Deinem $text4 schreibt: "Ich freue mich sehr auf den Besuch von Herrn Strasser.". Dann findet er nämlich auch das Wort Strasse. Dieses Problem hast Du aber wahrscheinlich bei jeder "Suchmethode".
Also aufpassen!
Bye
Christian Schnagl
PS: Vielleicht gibts noch eine einfachere Lösung, aber die o.g. ist mir spontan eingefallen.