Problem mit Wildcards in der DB Query (gelöst) (Datenbanken und Verzeichnisdienste)

[thread]20635[/thread]

Problem mit Wildcards in der DB Query [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+9 replies
Gast Timo

2019-07-11 11:46
Hallo zusammen,

ich möchte ein SELECT auf eine SQLite DB im Memory ausführen.
In der DB gibt es eine Spalte (FILE_NAME_LONG), wo Dateinamen hinterlegt sind. Die Dateinamen sind lang und bestehen unter anderem aus einigen Unterstrichen.

Beispiel 1 : ABC_0000_LALBC_00000_12345.pdf
Beispiel 2 : HBD_0000_LALBCR_00000_1235734.pdf

Mit dem SELECT möchte ich nur Beispiel 1 erhalten:
Code (perl): (dl )

$Query = qq(SELECT * FROM testDB WHERE (FILE_NAME_LONG LIKE '%\_LALBC\_%');
Jedoch scheint das maskieren des Unterstrichs nicht viel zu bringen, da ich sowohl Beispiel 1 als auch Beispiel 2 zurück bekomme.

Wie kann ich die Wildcard '_' richtig maskieren, so dass ich nur noch Beispiel 1 zurück bekomme?

VG
- +4 replies
- Crian
  
  2019-07-11 11:50
  
  User since
  2003-08-04
  5872 Artikel
  ModeratorIn
  
  Das ist mehr eine SQL-Frage.
  
  Ich hab mal nach "sqllite like underscore" gegeoogelt, hilft dir vielleicht
  
  https://stackoverflow.com/questions/7323162/sqlite...
  
  ?
  
  Ohne es hier ausprobieren zu können, könnte ein angehängtes "ESCAPE '_'" helfen.
  
  Alternativ könntest du mit GLOB experimentieren.
  Last edited: 2019-07-11 11:54:22 +0200 (CEST)
  s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
  
  use strict; use warnings; Link zu meiner Perlseite
  - +2 replies
  - Gast Timo
    
    2019-07-11 12:06
    
    Danke für die schnelle Antwort.
    
    Mir ist die Bedeutung des Unterstrichs als Wildcard in SQLite bewusst und auch das ich normalerweise mit dem Backslash maskieren kann.
    
    Wenn ich mir das Query zurückgeben lasse, welches von DBI "verarbeitet" wurde, dann sehe ich, dass der Backslash nicht berücksichtigt wird und somit der Unterstrich als Wildcard verwendet wird.
    
    Dementsprechend vermute ich das es eine andere Maskierungsmöglichkeit gibt, die von DBI dann richtig "verarbeitet" werden kann. Jedoch konnte ich das online noch nicht finden.
    Last edited: 2019-07-11 13:35:44 +0200 (CEST)
    - Raubtier
      
      2019-07-11 13:45
      
      User since
      2012-05-04
      1076 Artikel
      BenutzerIn
      
      Guest Timo
      Wenn ich mir das Query zurückgeben lasse, welches von DBI "verarbeitet" wurde, dann sehe ich, dass der Backslash nicht berücksichtigt wird und somit der Unterstrich als Wildcard verwendet wird.
      
      Durch das qq parst Perl den String. In Perl ist "\_" == "_". Der Backslash kommt also nie an.
      
      Verwende q statt qq. Oder nutze \\ mit qq.
  - Gast Timo
    
    2019-07-11 12:11
    
    Vielen Dank für deine schnelle Antwort.
    Last edited: 2019-07-11 13:35:48 +0200 (CEST)
- Daxim
  
  2019-07-11 13:46
  
  User since
  2007-08-01
  114 Artikel
  BenutzerIn
  
  Guest Timo
  Wie kann ich die Wildcard '_' richtig maskieren
  
  https://sqlite.org/lang_expr.html#like
  
  select * from testDB where FILE_NAME_LONG like '%\_LALBC\_%' escape '\';
- +3 replies
- rosti
  
  2019-07-11 14:19
  User since
  2011-03-19
  3492 Artikel
  BenutzerIn
  Zum Quoten (Escape) gibt es eine Funktion fürs DB Handle:
  
  Code (perl): (dl )
  
  $dbh->quote($query);
  
  Das ist die übliche Vorgehensweise die auch beim prepared Statement implizit Verwendung findet.
  
  MFG
  - +2 replies
  - Raubtier
    
    2019-07-11 14:31
    User since
    2012-05-04
    1076 Artikel
    BenutzerIn
    
    2019-07-11T12:19:51 rosti
    
    Code (perl): (dl )
    
    $dbh->quote($query);
    
    Generell ja. Ich möchte die Aussage von Rosti kräftig unterstützen!
    
    Ich arbeite eigentlich immer mit Platzhaltern und rufe quote praktisch nie von Hand auf, sondern implizit. Aber egal. Nie selber versuchen zu quoten, das wird immer falsch :-)
    
    Hier ist aber der Trick, dass man
    a) das ESCAPE-Zeichen angeben muss im SQL-Befehl und
    b) den Backslash generell innerhalb von qq-Strings quoten muss, damit Perl ihn nicht schon als Escapezeichen sieht (damit der \ überhaupt beim SQL-Server ankommt).
    - rosti
      
      2019-07-11 14:38
      
      User since
      2011-03-19
      3492 Artikel
      BenutzerIn
      
      Ergänzung: Es gibt außerdem auch
      Quote
      quote_identyfier()
      für Tabellen und Feldnamen, falls diese escaped werden müssen. Und an diesem Punkt, also wo man diese Funktion explizit aufrufen muss, ist man sehr schnell angelangt ;)
      
      MFG
      
      PS: Untenstehend noch eine universelle insert-Funktion aus meiner FW Factory:
      
      Code (perl): (dl )
      
      1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
      
      use strict; use warnings; sub insert{ my $self = shift; # Instanz einer beliebigen Klasse my $dbh = shift; # DB Handle my $tabn = shift; # Tabname my %hunt = @_; # field => value my @fields = keys %hunt; $dbh->do(qq( INSERT INTO @{[$dbh->quote_identifier($tabn)]} (@{[join ',', map{$dbh->quote_identifier($_)}@fields]}) VALUES( @{[join ',', map{$dbh->quote($_)}@hunt{@fields}]} ) )); } 1;
      
      Verwendet also quote() und quote_identyfier() um einen universellen Einsatz zu ermöglichen. Anwendung:
      
      Code (perl): (dl )
      
      1 2 3 4 5 6 7
      
      $self->insert($dbh, "log", url => "$proto$ENV{SERVER_NAME}$self->{URL}", ref => $ref, hugo => $hugo, lang => $self->{LANG}, title => $title );
      
      Und das ist einfach nur geil ;)
      
      .
      Last edited: 2019-07-11 20:08:12 +0200 (CEST)

View all threads created 2019-07-11 11:46.