Reguläre Ausdrücke aus Datenbank holen (Allgemeines zu Perl)

[thread]16920[/thread]

Reguläre Ausdrücke aus Datenbank holen

Tags: perl5 regex Ähnliche Threads

Leser: 17

Articles: hide open all | hide show old branches

+5 replies
dominicn

2011-11-16 11:40

User since
2003-08-08
327 Artikel
BenutzerIn

Hallo,

ich möchte diverse Suchbegriffe als reguläre Ausdrücke in einer Datenbank speichern, weil manchmal auch Platzhalter eingesetzt werden dürfen. Wie kann ich einen solchen String effektiv als RegEx interpretieren?

Z.B. $s = 'Haus \d'
Jetzt will ich prüfen ob, $text $s "enthält". Also würde ich eigentlich schreiben
if ($text =~ /$s/)
aber hier würde ja \d nicht interpretiert werden.

Danke.

modedit Editiert von pq: Tag 'regex' hinzugefügt
Last edited: 2011-11-16 11:53:44 +0100 (CET)
- +3 replies
- GwenDragon
  
  2011-11-16 11:49
  User since
  2005-01-17
  14759 Artikel
  Admin1
  Du musst den String $s in ein Regex umwandeln.
  Dafür gibt es den Operator qr.
  
  Beispiel:
  
  Code (perl): (dl )
  
  1 2 3
  
  my $regex = qr(Haus \d); if ($s =~ $regex) { }
  
  Last edited: 2011-11-16 11:55:25 +0100 (CET)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - pq
    
    2011-11-16 11:51
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    wie soll das gehen und was ist der unterschied zu vorher?
    funktioniert doch alles:
    
    Code: (dl )
    
    1 2 3 4 5 6 7 8 9 10
    
    $ perl -wE' my $regex = q{Haus \d}; my $string = "Haus 42"; say "Regex: $regex"; if ($string =~ m/$regex/) { say "match"; } ' Regex: Haus \d match
    
    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
  - GwenDragon
    
    2011-11-16 12:06
    
    User since
    2005-01-17
    14759 Artikel
    Admin1
    
    Ja, muss ist nicht korrekt.
    Der String wird ja im Match extrapoliert und funktioniert auch.
    die Drachin Gwen
    
    Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- pq
  
  2011-11-16 11:49
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  2011-11-16T10:40:10 dominicn
  aber hier würde ja \d nicht interpretiert werden.
  
  nun, du könntest es einfach mal ausprobieren.
  es wird nämlich interpretiert.
  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

View all threads created 2011-11-16 11:40.