Pattern mit Sonderzeichen (Allgemeines zu Perl)

[thread]15040[/thread]

Pattern mit Sonderzeichen

Tags: regex encoding Ähnliche Threads

Leser: 20

Articles: hide open all | hide show old branches

+13 replies
Gast leave-

2010-05-19 14:10

Hallo zusammen,

bei einem kleinen Programm ist mir aus zufall aufgefallen, das man alle Sonderzeichen mit einem Pattern wie ,,var != /[§]/" oder ,,var != /[!]/" filtern kann. Jetzt frage ich mich wieso bzw. warum man sich ein Sonderzeichen aussuchen kann? DANKE
Last edited: 2010-05-19 14:14:34 +0200 (CEST)
- +11 replies
- pq
  
  2010-05-19 14:15
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  kannst du das nochmal genauer ausführen?
  "das man alle Sonderzeichen mit einem Pattern wie ,,var != /[§]/" oder ,,var != /[!]/" filtern kann"
  mit einem pattern wie /[§]/ filtert man auf das paragraphenzeichen. nicht mehr und nicht weniger.
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +10 replies
  - Gast leaves-
    
    2010-05-19 14:26
    
    Ich habe die Abfrage eingebaut:
    
    if ($s1 <= $plzsuche && $plzsuche != /[§]/ && $s3 >= $plzsuche && $plzsuche != /[a-zA-Z]/ ) {
    
    Damit werden auch Eingaben abgefangen die z.B. ! oder " oder ? lauten. Also alle Sonderzeichen. Ich verstehe aber nicht warum?
    
    if ($s1 <= $plzsuche && $plzsuche != /["]/ && $s3 >= $plzsuche && $plzsuche != /[a-zA-Z]/ ) {
    
    führt zum selben Ergebnis wie oben!
    Last edited: 2010-05-19 14:30:39 +0200 (CEST)
    - +4 replies
    - Linuxer
      
      2010-05-19 14:31
      
      User since
      2006-01-27
      3890 Artikel
      HausmeisterIn
      
      Hinweis:
      
      != ist der Operator, der auf numerische Ungleichheit prüft.
      Du willst aber anscheinend gegen Pattern prüfen, also wahrscheinlich eher !~ verwenden...
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
      - +3 replies
      - Gast leaves-
        
        2010-05-19 14:34
        
        Das nummerische Werte geprüft werden ist klar. Ich frage mich warum das Pattern dennoch funktioniert.
        
        pq
        
        2010-05-19 14:37
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        ich hab dir erklärt, was dein code macht. wenn du das wirklich machen willst, deine sache.
        aber dann verrate uns, was in der variable $_ steht und wieso du das ergebnis eines matchings mit einer postleitzahl vergleichen willst.
        
        wenn du das *nicht* willst, dann haben dir gleich zwei leute gesagt, dass du !~ statt != willst.
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        Linuxer
        
        2010-05-19 14:50
        
        User since
        2006-01-27
        3890 Artikel
        HausmeisterIn
        
        Warum sollte es nicht funktionieren? pq hat Dir schon beschrieben, was der Code genau bedeutet/tut.
        Das Ergebnis des Pattern-Matching wird im numerischen Kontext verglichen...
        
        Code: (dl )
        
        1 2 3 4 5 6
        
        # ergebnis von (pattern match gegen $_) im numerischen Kontext $ perl -wle '$_="h1"; $b=0; $b += m/[!]/; print $b' 0 # dito, diesmal mit erfolgreichem Match $ perl -wle '$_="h1"; $b=0; $b += m/[1]/; print $b' 1
        
        Wenn Dir noch was unklar ist, werde bitte genauer.
        Fehlerbeschreibungen werden nicht besser, wenn man sie nach dem Motto "In der Kürze liegt die Würze" schreibt.
        
        meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
        Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
    - +5 replies
    - pq
      
      2010-05-19 14:33
      
      User since
      2003-08-04
      12208 Artikel
      Admin1
      
      Guest leaves-
      Ich habe die Abfrage eingebaut:
      
      if ($s1 <= $plzsuche && $plzsuche != /[§]/ && $s3 >= $plzsuche && $plzsuche != /[a-zA-Z]/ ) {
      
      Damit werden auch Eingaben abgefangen die z.B. ! oder " oder ? lauten. Also alle Sonderzeichen. Ich verstehe aber nicht warum?
      
      if ($s1 <= $plzsuche && $plzsuche != /["]/ && $s3 >= $plzsuche && $plzsuche != /[a-zA-Z]/ ) {
      
      führt zum selben Ergebnis wie oben!
      
      woher hast du denn das:
      $plzsuche != /[a-zA-Z]/
      
      ist dir klar, was das macht?
      das führt das matching auf dem string $_ aus und vergleicht das ergebnis des matchings numerisch mit $plzsuche.
      
      ich vermute, du willst eher das matching eher auf $plzsuche ausführen? dann so:
      $plzsuche !~ /[a-zA-Z]/
      
      der matching-operator (negativ) wird !~ geschrieben, nicht !=
      
      korrigier das erstmal und erstelle dann bitte ein kleines script mit beispieldaten und dem gewünschten ergebnis.
      Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
      lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
      - +4 replies
      - Gast leaves-
        
        2010-05-19 15:08
        
        Ich habe gedacht es wäre verständlich mit einem kurzen Beispiel.
        
        Vielen Dank pq, Du hast recht, ich meinte auch $plzsuche !~ /[a-zA-Z]/.
        
        Noch mal genauer: Ich untersuche Postleitzhalen die ich auf eine Eingabe hin selektiere. Die Idee: Sonderzeichen sollte dabei nicht akzeptiert werden => Fehler.
        
        Die Abfrage if ($s1 <= $plzsuche && $plzsuche != /[§]/ && $s3 >= $plzsuche && $plzsuche != /[a-zA-Z]/ ) {
        funktioniert bei allen Sonderzeichen, sprich, die Abfrage ist false bei ! oder = oder ".
        
        Wenn die Abfrage if ($s1 <= $plzsuche && $plzsuche !~ /[§]/ && $s3 >= $plzsuche && $plzsuche != /[a-zA-Z]/ ) {
        lautet, wird diese als String geprüft und es ist immer true, ausser wenn das Sonderzeichen ,,!" eingeben wird. Ich verstehe nicht warum?!
        
        Vielen Dank für die Hilfe
        
        pq
        
        2010-05-19 15:23
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        Guest leaves-
        ich meinte auch $plzsuche !~ /[a-zA-Z]/.
        [...]
        Die Abfrage if ($s1 <= $plzsuche && $plzsuche != /[§]/ && $s3 >= $plzsuche && $plzsuche != /[a-zA-Z]/ ) {
        
        wenn du es meintest, solltest du es vielleicht erstmal auch so schreiben =)
        und benutze bitte c-tags für code-schnippsel, das ist lesbarer (fixed-width und keine zufällige bbcode-interpretation).
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        Linuxer
        
        2010-05-19 16:14
        
        User since
        2006-01-27
        3890 Artikel
        HausmeisterIn
        
        Ich hätte da noch ein paar Gedanken zu:
        
        da Du $plzsuche numerisch mit $s1 vergleichst, scheinen also nur Zahlen in $plzsuche erwartet zu werden
        bevor der numerische Vergleich mit $plzsuche stattfindet, würde ich auf Gültigkeit prüfen
        Wenn der numerische Vergleich keine Warnung ausgibt, wenn $plzsuche eine Nichtziffer ausgibt, dann ist das ein Indiz dafür, dass Du keine warnings eingeschaltet hast.
        Wenn keine warnings aktiv sind, vermute ich, ist auch kein strict aktiv. Beides würde ich verwenden.
        
        Beispiel:
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8
        
        if ( $plzsuche =~ m{\D} ) { # $plzsuche enthaelt eine Nichtziffer => Fehler die "Fehler: PLZ Suche ist nicht gültig (nur ganze Zahlen erlaubt): $plzsuche\n"; } # So könnte es dann weitergehen ... elsif ( $s1 <= $plzsuche && $s3 >= $plzsuche ){ # ... }
        
        Skripte würde ich immer mit diesen zwei Zeilen beginnen lassen:
        
        Code (perl): (dl )
        
        1 2
        
        use strict; use warnings;
        
        "strict" zwingt Dich, sauberer zu arbeiten, siehe auch: UseStrict
        "warnings" gibt Dir Warnungen aus, wenn Du beispielsweise eine Variable ohne definierten Inhalt in einem Vergleich verwendest, oder eine Nicht-Nummer bei einem numerischen Vergleich...
        meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
        Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
        
        renee
        
        2010-05-20 10:19
        
        User since
        2003-08-04
        14371 Artikel
        ModeratorIn
        
        Für Postleitzahlenüberprüfung nehme ich ganz gerne Regexp::Common::zip. Vor allem wenn man für unterschiedliche Länder überprüfen muss. Nicht alle Postleitzahlen sind so angenehm zu prüfen wie deutsche PLZ.
        
        Eine Überprüfung bei deutschen PLZ würde ich so machen:
        
        Code (perl): (dl )
        
        1 2 3
        
        if ( $plz !~ m/ \A \d{5} \z /x ) { print "Ungueltige Eingabe!\n"; }
        
        OTRS-Erweiterungen (http://feature-addons.de/)
        Frankfurt Perlmongers (http://frankfurt.pm/)
        --
        
        Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
        Perl-Entwicklung: http://perl-services.de/
- Gast wer
  
  2010-05-19 14:28
  
  sieht mir nicht nach perl aus.
  Last edited: 2010-05-19 14:30:18 +0200 (CEST)

View all threads created 2010-05-19 14:10.