Regex (Allgemeines zu Perl) - Perl-Community.de

[thread]16833[/thread]

Regex

Tags: perl5 Ähnliche Threads

Leser: 21

Articles: hide open all | hide show old branches

+4 replies
choff

2011-10-21 11:07
User since
2011-10-05
12 Artikel
BenutzerIn
Hallo, ich möchte gern mit Regex etwas matchen.

Bis jetzt habe ich folgendes:
Ich habe ein Array, welches ich mit einer for schleife durchgehe und jeweils immer als überschrift etwas mit regex abfangen will.
Code (perl): (dl )

1 2

$results[$i] =~ m/(\w*)\s/; print "$1:\n";
Damit kann ich z.B. solche Strings matchen:
VOLUME14_ADMTL04
VOLUME13_Emil

Aber es kommen auch solche vor:
Volume 2 SAPSWW
Volume 3 SAPSWL

Wie kann ich beide Typen mit einem Regex Befehl abfangen? Ich könnte evtl auch noch eine if Schleif einbauen.
Last edited: 2011-10-21 11:15:30 +0200 (CEST)
- Linuxer
  
  2011-10-21 11:28
  User since
  2006-01-27
  3891 Artikel
  HausmeisterIn
  Du könntest mal m/^(\w+\s?\d+[\s_]\w+)/ versuchen.
  
  Erklärung:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10
  
  m/ ^ # String-/Zeilenanfang ( \w+ # erstes Wort, potentiell "volumne" \s? # ein Leerzeichen, oder auch keines \d+ # eine Zahl [\s_] # ein Leerzeichen oder Unterstrich \w+ # und noch ein Wort ) /x
  
  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!
- +2 replies
- payx
  
  2011-10-21 11:39
  
  User since
  2006-05-04
  564 Artikel
  BenutzerIn
  
  Hallo choff,
  
  das ist m.E. noch zu unklar. Verstehe ich recht, dass Du aus Strings, über die Du loopst, Zeichenketten wie z.B. "VOLUME14_ADMTL04" oder "Volume 2 SAPSWW" extrahieren willst?
  
  Damit Du eine regular expression machen kannst, musst Du die Regeln genau definieren können, nach denen eine Zeichenfolge gematcht werden soll. (Daher auch der Name der regular expression.) Auch die Beschaffenheit der enthaltenden Strings muss bekannt und beschrieben sein.
  
  Im Moment matchst Du die erste zusammenhängende Zeichenkette, die im String vor einem Whitespace steht.
  
  Wenn Du Unterstützung bekommen möchtest, solltest Du ein paar Input-Strings und die darin zu matchenden Zeichenketten bereitstellen. Die Beispiele sollten so ausgewählt sein, dass alle tatsächlich vorkommenden Konstallationen darin vertreten sind.
  
  HTH
  Grüße
  payx
  - suresh
    
    2011-10-21 12:27
    User since
    2010-10-12
    109 Artikel
    BenutzerIn
    
    Hi,
    wenn du die patterns nur matchen willst, dann könntest du zb die whitespaces durch Unterstrich ersetzen und dann dein pattern matching anwenden:
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8
    
    my @pattern = ("Volume 2 SAPSWW", "VOLUME14_ADMTL04"); foreach my $pattern (@pattern) { $pattern =~ s/\s/_/g; $pattern =~ m/^\w+$/g; print "Matching: $pattern\n"; }

View all threads created 2011-10-21 11:07.