Regex abkürzen? (Allgemeines zu Perl)

[thread]19082[/thread]

Regex abkürzen?

Leser: 17

Articles: hide open all | hide show old branches

+10 replies
bandchef

2014-05-07 14:00
User since
2014-05-05
15 Artikel
BenutzerIn
Hi Leute!

Ich hab hier eine für meine Verhältnisse sehr lange Regex, die auch so funktioniert ich aber vieles maskiere, was ich nicht brauche...
Code: (dl )

/(^TF Bus=)(\w+\s)(TFId=)(\d+\s)(SPort=)(\d+\s)(DIP=)(\d+.\d+.\d+.\d+\s)(DPort=)(\d+\s)(TP=)(\w+\s)(;)(\s)(\w+)/)
In dieser Regex brauch ich nun den Bereich von SPort= bis zur letzten Klammer.
Wie kann ich den Regex so ändern, dass ich den Bereich abgekürzt schreiben kann?
- payx
  
  2014-05-07 14:17
  
  User since
  2006-05-04
  564 Artikel
  BenutzerIn
  
  Hallo bandchef,
  
  2014-05-07T12:00:45 bandchef
  Ich hab hier eine für meine Verhältnisse sehr lange Regex, die auch so funktioniert ich aber vieles maskiere, was ich nicht brauche...
  
  mit "maskieren" meinst Du offenbar das, was in der Doku capturing heißt. Und wenn man das weiß, ahnt man vielleicht schon, dass man etwas braucht, was non-capturing heißt:
  
  http://perldoc.perl.org/perlretut.html#Non-capturi...
  
  Die Regex wird dadurch nicht kürzer, aber es werden nur noch die Werte in ($1 usw.)-Variablen gespeichert, die nicht non-capturing sind.
  
  HTH
  Grüße
  payx
- GwenDragon
  
  2014-05-07 14:29
  User since
  2005-01-17
  14548 Artikel
  Admin1
  Code (perl): (dl )
  
  1 2 3 4 5
  
  my $re = qr{^.+?(SPort=)(\d+\s)(DIP=)(\d+.\d+.\d+.\d+\s)(DPort=)(\d+\s)(TP=)(\w+\s)(;)(\s)(\w+)}; # Regex erzeugen if ( my @fields = ($line =~ $re) ) { # falls Regex in $re matcht, gecaptureted Felder (="Klammerausdrücke" des Regex) in @fields speichern # hier @fields weiter bearbeiten }
  
  die Drachin, Gwendolyn
  
  Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
- +7 replies
- Gast wer
  
  2014-05-07 14:33
  
  wofür brauchst du:
  TF Bus=
  TFId=
  SPort=
  DIP=
  DPort=
  TP=
  ;
  \s
  das sind feste Strings die sich nicht ändern können. Warum captures du sie?
  Last edited: 2014-05-07 14:45:54 +0200 (CEST)
  - +6 replies
  - bandchef
    
    2014-05-09 08:11
    
    User since
    2014-05-05
    15 Artikel
    BenutzerIn
    
    Wie kann man dann einen bestimmten Bereich überspringen?
    - Gast wer
      
      2014-05-09 08:15
      
      keine klammer drum machen
      Last edited: 2014-05-09 08:54:53 +0200 (CEST)
    - +4 replies
    - GwenDragon
      
      2014-05-09 08:56
      
      User since
      2005-01-17
      14548 Artikel
      Admin1
      
      Es werden im Allgemeinen nur Regex gefangen, die in Klammern stehen.
      die Drachin, Gwendolyn
      
      Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
      - +3 replies
      - bandchef
        
        2014-05-09 09:28
        
        User since
        2014-05-05
        15 Artikel
        BenutzerIn
        
        Ich hab nun den Regex so geändert und die capture-Klammern nur um die Teile gemacht, die mich wirklich interessieren:
        
        Code: (dl )
        
        /^TF Bus=(\w+)\sTFId=(\d+)\sSPort=(\d+)\sDIP=(\d+.\d+.\d+.\d+)\sDPort=(\d+)\sTP=(\w+)\s;\s(\w+)/
        
        Ist das jetzt eigentlich schon eine größe von Regex von der man die capture-Variablen lieber in "benamte" Variablen zwischenspeichern sollte, um mit diesen dann weiterzuarbeiten?
        
        Linuxer
        
        2014-05-09 09:36
        
        User since
        2006-01-27
        3875 Artikel
        HausmeisterIn
        
        Naja, wie lang wird der Code-Block sein, in dem Du damit arbeiten willst? Aber alleine aufgrund der Anzahl (7) würde ich wohl dazu tendieren, die eingefangenen Werte in (ordentlich) benannten Variablen zu speichern.
        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!
        
        GwenDragon
        
        2014-05-09 09:39
        
        User since
        2005-01-17
        14548 Artikel
        Admin1
        
        Das Speichern in benannte Variablen schafft dir mehr Übersicht.
        Es ist auch sinnvoll, da bei Matches später im Code die Variablen $1, $2, ... überschrieben werden könnten.
        
        Also möglich früh die Matches $1, ... auswerten und in Variablen zuweisen.
        die Drachin, Gwendolyn
        
        Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel

View all threads created 2014-05-07 14:00.