[DBI] Abfrage in Hash (solved) (Datenbanken und Verzeichnisdienste)

[thread]18758[/thread]

[DBI] Abfrage in Hash [solved]

Tags: perl5 DBI MySQL Similar Threads

Readers: 15

Articles: hide open all | hide show old branches

+5 replies
Kean

2013-11-21 15:26
User since
2004-08-18
464 articles
BenutzerIn
Ich lade bisher meine Daten aus einer MySQL Datenbank mit folgendem Code:
Code (perl): (dl )

1 2 3 4 5

my $sql = "SELECT Typ, Schluessel, Anrede, Name, Zusatz, Strasse, PLZ, Ort, Email, Internet, Lief_KDNR, Memos FROM Adressen WHERE Nummer = '".$adress_nr."';"; my $sth = $dbh->prepare($sql); $sth->execute; my @row = map { defined $_ ? $_ : '' } $sth->fetchrow_array;
Dabei werden durch das "map" alle leeren bzw. NULL Datenbankfelder durch '' ersetzt.
Danach kann ich mit $row[0], $row[1], etc. auf die Daten zugreifen.

Gibt es eine Möglichkeit, dass die Daten nicht in ein Array sondern in ein Hash geladen werden? Und ich dann mit $row{'Typ'} auf die Daten zugreifen kann?
Ich habe mal etwas über fetchrow_hashref() gelesen aber bin mir nicht sicher wie ich das "map" einbauen kann und ob das auch ohne Referenzen geht.
- Muffi
  
  2013-11-21 15:38
  
  User since
  2012-07-18
  1465 articles
  BenutzerIn
  
  Wenn irgendwie möglich setz die DB-Felder auf "NOT NULL"
  
  PS: Scheib keine Variablen direkt in die Query.
  Last edited: 2013-11-21 15:39:54 +0100 (CET)
  1 + 1 = 10
- +3 replies
- payx
  
  2013-11-21 15:39
  User since
  2006-05-04
  564 articles
  BenutzerIn
  Hallo Kean,
  
  vorweg: Wenn Du schon mit prepare arbeitest, solltest Du auch Platzhalter verwenden.
  
  Code (perl): (dl )
  
  1 2 3
  
  my $sql = "SELECT Typ, Schluessel, Anrede, Name, Zusatz, Strasse, PLZ, Ort, Email, Internet, Lief_KDNR, Memos FROM Adressen WHERE Nummer = ?;"; my $sth = $dbh->prepare($sql); $sth->execute($adress_nr);
  
  Und ja, fetchrow_hashref() ist gut, was spricht dagegen?
  
  Code (perl): (dl )
  
  my %row = map { defined $_ ? $_ : '' } %{$sth->fetchrow_hashref()};
  
  Hinweis: Code-Schnipsel nur beispielhaft gemeint, ungetestet.
  
  HTH
  Grüße
  payx
  - +2 replies
  - Kean
    
    2013-11-21 16:14
    
    User since
    2004-08-18
    464 articles
    BenutzerIn
    
    Es spricht nichts dagegen, wusste nur nicht wie :-)
    Dein Code-Schnipsel funktioniert. Vielen Dank!
    
    Die Platzhalter hab ich jetzt eingebaut! Finde es nur ohne etwas übersichtlicher bzw. besser lesbar... Denke ich gewöhne mich aber daran.
    
    Viele Grüße
    Kean
    - jan
      
      2013-11-21 16:54
      
      User since
      2003-08-04
      2536 articles
      ModeratorIn
      
      2013-11-21T15:14:12 Kean
      Die Platzhalter hab ich jetzt eingebaut! Finde es nur ohne etwas übersichtlicher bzw. besser lesbar... Denke ich gewöhne mich aber daran.
      
      Der größte Vorteil ist, dass Du nicht mehr immer ...'" . $var . "' schreiben musst und vor allem: der Inhalt von $var wird beim execute automatisch escapt, also keine SQL-Injections.
      
      Ich fänd's auch spitze, wenn's endlich named-placeholders gäbe, aber naja, ? sind besser als gar nichts, wenn man schon direkt SQL schreiben muss.

View all threads created 2013-11-21 15:26.