böse einträge automatisch löschen ... - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von hanns (39 Beiträge) am Mittwoch, 8.August.2007, 12:19.
    böse einträge automatisch löschen ...

      hallo,

      ich möchte, dass böse einträge
      in die datenbank automatisch gelöscht
      werden.

      wenn also jdn. böse wörter wie "a...loch" usw.
      verwendet, dann soll der gesamte eintrag
      automatisch gelöscht werden.

      angenommen jdn. schreibt:
      "die computerzucht in nepal wird von a..löchern betrieben"
      dann soll aufgrund des einen bösen wortes der gesamte eintrag
      gelöscht werden.

      wie realisiere ich das?

      habe z. B. ein perlscpript für automatisches löschen
      nach einer best. zeit:

      <perl>
             del "Datum<-58", "main";
 </perl>

      gibt es so was auch für dieses problem???

      gruss
      hanns


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von hanns (39 Beiträge) am Mittwoch, 8.August.2007, 12:19.
    böse einträge automatisch löschen ...

      hallo,

      ich möchte, dass böse einträge
      in die datenbank automatisch gelöscht
      werden.

      wenn also jdn. böse wörter wie "a...loch" usw.
      verwendet, dann soll der gesamte eintrag
      automatisch gelöscht werden.

      angenommen jdn. schreibt:
      "die computerzucht in nepal wird von a..löchern betrieben"
      dann soll aufgrund des einen bösen wortes der gesamte eintrag
      gelöscht werden.

      wie realisiere ich das?

      habe z. B. ein perlscpript für automatisches löschen
      nach einer best. zeit:

      <perl>
             del "Datum<-58", "main";
 </perl>

      gibt es so was auch für dieses problem???

      gruss
      hanns

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Mittwoch, 8.August.2007, 16:38.
    Re: böse einträge automatisch löschen ... 

      <perl>
undef %_put if $_put{Text}=~/a..loch|b..loch|weitere böse begriffe/;
</perl>

      Zwischen den /.../ stehen die Wörter die abgewiesen werden sollen, durch | getrennt bei mehreren...

     Antworten

    Beitrag von hanns (39 Beiträge) am Mittwoch, 8.August.2007, 16:54.
    Re: Re: böse einträge automatisch löschen ...

      danke.

      werde ich mal probieren :-))

      dürfen da auch sonderzeichen wie "@" auftreten?

      hanns

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Mittwoch, 8.August.2007, 17:01.
    Re: Re: Re: böse einträge automatisch löschen ...

      Bei Sonderzeichen musst Du ein \ davor machen, also z.B.

      <perl>
undef %_put if $_put{Text}=~/info\@spammer.com/;
</perl>

     Antworten

    Beitrag von hanns (39 Beiträge) am Donnerstag, 9.August.2007, 11:57.
    Re: Re: Re: Re: böse einträge automatisch löschen ...

      das klappt irgendwie nicht:

      angenommen meine datenbank heißt "testdatenbank"
      in dieser datenbanken befinden sich verschiedene felder
      u. a. auch das feld "testvorname"

      -----

      angenommen einträge mit dem vornamen "peter" wären böse.

      wie lautet dann der perl code zum löschen?

      was muss ich für die fragezeichen unten einsetzen?

      und wird nur der eintrag verhindert oder werden auch
      bereits in der datenbank sich befindendne böse peter-einträge
      gelöscht???


      <perl>
undef %_put if $_put{???????}=~/peter/;
</perl>

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Donnerstag, 9.August.2007, 14:21.
    Re: Re: Re: Re: Re: böse einträge automatisch löschen ...

      undef %_put if $_put{testvorname}=~/peter/;

      Es werden nur neue böse Einträge verhindert...

     Antworten

    Beitrag von scbets (0 Beiträge) am Freitag, 10.August.2007, 21:32. WWW: myportal.de.gg
    Re: Re: Re: Re: Re: böse einträge automatisch löschen ... 

      <loop db=meinedatenbank code=perl>
$zensur="[ZENZIERT]";

      $Text =~ s#Arsch(\w+)#sprintf($zenzur,$1)#ge; #zenziert/ersetzt wörter wie Ar...loch mit [ZENZIERT]

      out" $Text";

      </loop>

     Antworten


     
 Liste der Einträge von 12601 bis 12751:Einklappen Zur Eingabe 
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < Zur Eingabe  > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge

Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.09s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!