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

[thread]16639[/thread]

Hashes

Tags: perl5 hash Similar Threads

Readers: 28

Articles: hide open all | hide show old branches

+5 replies
guest whoop

2011-08-18 08:32
Hi, Hab ein leichtes anfänger problem und zwar:
Ich habe einen hash
Code: (dl )

1 2

my %hash = ( 'foo' => { bla => bla, ... , });
Und ein paar SQL query, wo die variablen verbunden werden bzw zusammen gesetzt werden.
Code: (dl )

1 2

$sql .= "query1"; $sql .= "query2";
Nun möchte ich diese querys aber aber im hash speicher wie mach ich das am besten ?
einfach sql => "query1" ?! aber wie werden sie nun zusammen gesetzt ?

danke schon im vorhaus, lg
Last edited: 2011-08-18 09:50:33 +0200 (CEST)
- Dubu
  
  2011-08-18 10:01
  User since
  2003-08-04
  2145 articles
  ModeratorIn + EditorIn
  Meinst du das?
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
  
  #!/usr/bin/perl use strict; use warnings; my %hash = ( foo => { bar => "SELECT * FROM mytable ", }, ); $hash{foo}{bar} .= "WHERE user=? "; $hash{foo}{bar} .= "AND email=? "; use Data::Dumper; print Dumper \%hash; __END__ $VAR1 = { 'foo' => { 'bar' => 'SELECT * FROM mytable WHERE user=? AND email=? ' } };
  
  "wo die variablen verbunden werden" - Ich hoffe, du setzt keine Variablen einfach in den Query, deren Inhalt von außen kommt! Dafür gibt es Platzhalter (Fragezeichen, wie oben) und bind. Sonst handelst du dir mit hoher Wahrscheinlichkeit eine schöne SQL-Injection-Sicherheitslücke ein.
- payx
  
  2011-08-18 10:04
  
  User since
  2006-05-04
  564 articles
  BenutzerIn
  
  Hallo whoop,
  
  Guest whoop
  Hi, Hab ein leichtes anfänger problem und zwar:
  Ich habe einen hash
  
  Genauer gesagt einen Hash of Hashes, oder noch genauer of Hash References.
  
  Deine Angaben lassen nicht erkennen, was es mit diesen SQL-Statements auf sich hat und warum sie als Hash gespeichert werden sollen. Möglich ist es natürlich. Aber wenn Du in Deinem Script dynamisch SQL-Statements erzeugst, ist die Methode mit der Konkatenierung vielleicht sogar besser, denn in einem Hash sind die Elemente unsortiert, d.h. Du würdest - je nach Vorgehensweise - die Bestandteile Deines SQL-Scripts möglicherweise nicht in der richtigen Reihenfolge zurückbekommen.
  
  Wenn Du mehr über Dein Script verrätst, kann Dir hier bestimmt geholfen werden.
  
  Grüße
  payx
- rosti
  
  2011-08-18 19:19
  
  User since
  2011-03-19
  3463 articles
  BenutzerIn
  
  Mit Statementhandle
  fetchrow_hashref
  fetchall_hashref
  
  mit DB-Handle
  selectrow_hashref
  selectall_hashref
  selectcol_hashref
- rosti
  
  2011-08-20 07:38
  User since
  2011-03-19
  3463 articles
  BenutzerIn
  nochne kleine Ergänzung, das Schöne an DBI ist ja, dass Du eine Egebnismenge sehr gut auf Hash-Referenzen abbilden kannst. Da ich Deine Query nicht im Ganzen kenne, mal ein extra Beispiel:
  
  Die Tabelle hat eine Spalte 'farbe' vom Typ enum hier stehen verschiedene Farben wie z.b. rot, blau, gelb. Eine Abfrage soll die Anzahl der Artikel liefern, die entweder rot, blau oder gelb sind, Statement:
  
  Code: (dl )
  
  SELECT COUNT(article) as cnt, farbe FROM mytable GROUP BY farbe;
  
  Da es keine WHERE-Klause gibt, wo Platzhalter eingestetzt werden müssen, nehmen wir gleich das Handle $dbh für die Abfrage wie folgt:
  
  Code (perl): (dl )
  
  my $ref = $dbh->selectall_hashref('farbe');
  
  Das Ergebnis in $ref ist ein Hash mit den Schlüsseln aus dem enum-Feld:
  
  Code (perl): (dl )
  
  1 2
  
  $rote_artikel = $ref->{rot}->{cnt}; $blaue_artikel = $ref->{blau}->{cnt};
  
  Schönes Wochenende!

View all threads created 2011-08-18 08:32.