Moin!
foreach $item (@badwords)
{
$DATA{'msg'}=~s/$item//g
}
In @badwords stehen die Wörter, die aus $DATA{'msg'} gelöscht werden sollen. Leider ist diese Funktion Case-Sensitive, so dass zwar das Wort "sex" gelöscht wird, das Wort "Sex" aber nicht, zum Beispiel.
Ich kann mir so garnicht vorstellen, daß du mit dieser Funktion das Wort "Busexpress" zu "Bupress" verkürzen willst. Oder "Sextant" zu "tant". ;)
Und wenns ganz dumm kommt, dann kürzt du sogar doppelt raus, weil das erste vermeintliche Badword rausfliegt, und dadurch an der Schnittstelle ein zweites Badword entsteht.
- Sven Rautenberg
Eigentlich sollten nur ganze Wörter gelöscht werden, oder? Das ist eine gute Theorie, gleich mal testen.
Stimmt, du hast Recht, er kürzt auch ganze Worte. Hmmm, aber wie vorhin schon erwähnt, durch den "Zurück-Button" kann derjenige seinen Text noch einmal überarbeiten.