Datenbankhandle ins Subs mitgeben oder jedes mal neu instanziieren? (Datenbanken und Verzeichnisdienste)

[thread]20341[/thread]

Datenbankhandle ins Subs mitgeben oder jedes mal neu instanziieren?

Tags: perl5 MySQL Ähnliche Threads

Leser: 18

Articles: hide open all | hide show old branches

+21 replies
Gast Andi123

2017-08-01 14:09

Hallo,

sollte man ein Datenbankhandle in Subs als Parameter mit übergeben?

Oder bei jedem Aufruf der Sub eine neue Verbindung zur Datenbank öffnen und am Ende der Sub dann wieder schließen?

Datenbank ist eine MySql-Datenbank.

Danke
Andi
Last edited: 2017-08-01 14:42:46 +0200 (CEST)
- +2 replies
- GwenDragon
  
  2017-08-01 15:55
  
  User since
  2005-01-17
  14748 Artikel
  Admin1
  
  Kommt auf die Performance der DB, auf die Ressourcen, auf die Programmlogik an.
  Möglich früh wieder das DB-Handle schließen ist sinnvoll, wenn man wenig DB-Handles frei hat, viel Traffic in der DB ist.
  Also ich habe noch im Kopf (vielleicht auch vor über 10 Jahren falsch bei Perl gelernt): früh schließen.
  
  Natürlich kannst du auch ein offenes DB-Handle mitschleppen als Parameter einer Sub.
  
  Mals sehen was andere noch sagen.
  Last edited: 2017-08-01 15:56:53 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - Raubtier
    
    2017-08-01 16:45
    
    User since
    2012-05-04
    1075 Artikel
    BenutzerIn
    
    Ich hätte jetzt spontan "möglichst selten öffnen" gesagt. Das schließt "früh schließen" ja nicht aus. Aber wenn ich 50 DB-Abfragen habe, dann sollte ich nur 1x die DB-Verbindung aufbauen, meinen Abfragen machen und dann wieder schließen. Nicht 50x auf- und abbauen.
    
    Kommt aber sicher auf den Anwendungsfall an. Wenn deine Abfrage 10 Minuten dauert, ists zum Beispiel völlig egal. Bist du im Web-Bereich unterwegs, wo es um Millisekunden bis zum Page view geht, hast du ganz andere Prioritäten.
    
    Ich würde dazu tendieren, die DB-Verbindung nicht innerhalb deiner sub zu managen. Die soll sich schön um die Abfrage kümmern und nicht die Verbindung auf- oder abbauen.
- +4 replies
- Gast wer
  
  2017-08-01 16:43
  
  Aus meiner Erfahrung:
  1. So spät wie möglich öffnen ( unnötige connects vermeiden )
  2. So früh wie möglich schließen ( Platz machen für andere )
  3. So wenig wie möglich öffnen und schließen. ( Prozess zeit sparen und Fehler minimieren )
  
  Also das durch reichen in Funktionen ist aus meiner Sicht sinnvoll.
  Last edited: 2017-08-01 16:53:24 +0200 (CEST)
  - +3 replies
  - clms
    
    2019-01-24 17:29
    User since
    2010-08-29
    373 Artikel
    BenutzerIn
    
    Bei mir sind die Prioritäten anders:
    1. So wenig wie möglich öffnen und schließen
    2. So spät wie möglich öffnen
    
    Aber wie schon mehrfach gesagt, das hängt stark von der Anwendung und den Lastprofilen ab. Bei mir (Backend für einen Webserver) ist die Anzahl der parallel offenen Connects unkritisch, da sie ohnehin auf die Anzahl der parallelen Instanzen des Webservers plus max. 2 Admin-Connects begrenzt ist.
    
    Deshalb öffne ich die Datenbank einmal und verwende den Handle dann in allen Funktionen die auf die Datenbank zugreifen müssen. Den Handle als Parameter an all diese Funktionen durchzureichen, wäre mir aber zu umständlich.
    
    Deshalb verwende ich eine Klasse mit einer statischen Methode, die den geöffneten Handle zurückgibt.
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
    
    package My::DBI; my $dbh_static; # fester Handle my $dbh; # temporärer Pointer, wird nach jedem HTTP-Request gelöscht. sub dbh { $dbh ||= _connected_dbh() } sub _connected_dbh { unless (is_conneced($dbh_static)) { $dbh_static = DBI_>connect(...); # init $dbh_static } return $dbh_static; }
    
    Mit My::DBI::dbh() kann ich dann von überall direkt auf den konnektierten Datenbank-Handle zugreifen. Meist mache ich das aber über andere statische Funktionen in my::DBI, die Standardabfragen bereitstellen oder Dinge wie Cachen von prepared Statements übernehmen.
    - +2 replies
    - rosti
      
      2019-01-24 18:14
      
      User since
      2011-03-19
      3472 Artikel
      BenutzerIn
      
      Ich kannte mal einen Shop, da sind regelmäßig Warenkörbe im Nirvana verschwunden: Wegen statischer DB Sessions ;)
      
      .
      - clms
        
        2019-01-24 20:15
        
        User since
        2010-08-29
        373 Artikel
        BenutzerIn
        
        Klar, da muss man aufpassen. Deshalb lösche ich $dbh nach jedem HTTP-Request und überprüfe bei einem neuen Request ob $dbh_static noch verbunden ist, bevor ich das wieder $dbh zuweise.
- rosti
  
  2017-08-01 20:09
  User since
  2011-03-19
  3472 Artikel
  BenutzerIn
  Idee: Das Databasehandle kommt mit der Instanz:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14
  
  sub logger{ my $self = shift; my %hunt = ( url => '', referrer => '', tracker => '', host => '', @_); $self->{DBH}->do(qq( INSERT INTO log (url, referrer, tracker, host) values (?, ?, ?, ?), {}, @hunt{qw( url referrer tracker host)}) )); }
  
  PS: Und wenn die Instanz noch kein {DBH} hat, wird es in der sub erstellt.
  Last edited: 2017-08-01 20:14:01 +0200 (CEST)
- +10 replies
- Gast Andi123
  
  2017-08-03 11:27
  
  Hm, danke für die Antworten.
  
  Schwierige Entscheidung :)
  
  Es wird oft auf die Datenbank zugegriffen, aber lastmäßig ist das neun von zehn Tagen kein Problem.
  
  Nur am zehnten Tag (Stichtag der Aktion) steigt die Last sehr deutlich an und hat in der Vergangenheit zu Problemen geführt.
  
  Gut, dann werde ich mir das mal durch den Kopf gehen lassen...
  Last edited: 2017-08-03 12:18:02 +0200 (CEST)
  - rosti
    
    2017-08-03 12:37
    
    User since
    2011-03-19
    3472 Artikel
    BenutzerIn
    
    Ich denke das ist weniger eine Frage ob ein DBH als Argument übergeben wird sondern eher eine Frage der Abfrage-Optimierung, hierzu würde ich auch den DB-Administrator mit ins Boot holen. MfG
  - +8 replies
  - GwenDragon
    
    2017-08-03 13:07
    
    User since
    2005-01-17
    14748 Artikel
    Admin1
    
    Ich muss Rosti Recht geben.
    Ihr solltet lieber mal prüfen, ob der Datenbankserver wirklich optimale Einstellungen hat und mal Monitoring machen wo der Flaschenhals ist.
    Vielleicht liegt es an FastCGI, mod_perl oder so.
    
    mysqltuner ist ein feines Perl-Tool.
    
    Zu DB-Tuning:
    http://www.highperfmysql.com/
    https://www.percona.com/blog/2016/10/12/mysql-5-7-...
    https://www.thomas-krenn.com/de/wiki/MySQL_Perform...
    https://www.linode.com/docs/databases/mysql/how-to...
    Last edited: 2017-08-03 13:13:37 +0200 (CEST)
    die Drachin Gwen
    
    Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
    - +7 replies
    - kolibri250
      
      2019-01-20 23:03
      
      User since
      2019-01-20
      51 Artikel
      BenutzerIn
      
      auch mal auf die indizes achten! eventuell sind die garnicht gesetzt oder schlicht falsch... so daß die zugriffe insgesamt länger dauern, die last steigt.. mehr anfragen zur selben zeit dann noch mehr zeit brauchen, das schraubt sich dann fix hoch, bis zum serverload von 12.0 :D
      
      auch schon gehabt...
      
      das (durchdachte) setzen des key-index auf die betreffenden felder des fetches kann da echt wahre wunder wirken!
      
      aber btw: ich öffne bei programmstart den handle auf die db.. und schliesse ihn garnicht mehr.. mache das seit jahren so, und habe eig. keine probleme damit...
      
      sobalds programm schliesst, schliesst dann auch die connection zur db..
      mag wild anmuten, aber wir haben auch mitunter hohen traffic auf den projekten und in richtung datenbanklast keine probleme (mehr, seit vernünftiger indexierung der tabellenfelder)
      Last edited: 2019-01-20 23:08:37 +0100 (CET)
      - +6 replies
      - GwenDragon
        
        2019-01-21 16:12
        
        User since
        2005-01-17
        14748 Artikel
        Admin1
        
        Nett.
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        +5 replies
        
        rosti
        
        2019-01-21 16:40
        
        User since
        2011-03-19
        3472 Artikel
        BenutzerIn
        
        Genau! Von wegen mir Ommas un Oppas sin zu alt für. Mir hahm das nämlich alles erfunden ;)
        
        +3 replies
        
        kolibri250
        
        2019-01-21 17:47
        
        User since
        2019-01-20
        51 Artikel
        BenutzerIn
        
        2019-01-21T15:40:42 rosti
        Genau! Von wegen mir Ommas un Oppas sin zu alt für. Mir hahm das nämlich alles erfunden ;)
        
        ich sach ja nur.. :D manchmal sieht man ja den wald vor lauter bäumen net ;)
        
        +2 replies
        
        GwenDragon
        
        2019-01-21 20:44
        
        User since
        2005-01-17
        14748 Artikel
        Admin1
        
        Wir bösen, alten Programmier-Dinos machen doch nur Spaaaaaß und ärgern ein bisschen die Programmierenkel ;)
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        kolibri250
        
        2019-01-21 21:22
        
        User since
        2019-01-20
        51 Artikel
        BenutzerIn
        
        2019-01-21T19:44:32 GwenDragon
        Wir bösen, alten Programmier-Dinos machen doch nur Spaaaaaß und ärgern ein bisschen die Programmierenkel ;)
        
        weisst, was das schlimme daran ist??? hab mit perl 2001 angefangen! normalerweise müsst ich auch schon längst dino sein :(( *heul*
        
        (aaaarggghhhh) musst schon wieder neu einloggen :(
        
        GwenDragon
        
        2019-01-21 20:43
        
        User since
        2005-01-17
        14748 Artikel
        Admin1
        
        Jau!
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +2 replies
- Muffi
  
  2019-01-21 08:49
  
  User since
  2012-07-18
  1465 Artikel
  BenutzerIn
  
  Gegenfrage: Wo haben die Subs Server/User/Pass her?
  
  [EDIT] Oh, schon älter... reingefallen ;)
  Last edited: 2019-01-21 08:50:28 +0100 (CET)
  1 + 1 = 10
  - kolibri250
    
    2019-01-21 13:11
    
    User since
    2019-01-20
    51 Artikel
    BenutzerIn
    
    2019-01-21T07:49:16 Muffi
    Gegenfrage: Wo haben die Subs Server/User/Pass her?
    
    [EDIT] Oh, schon älter... reingefallen ;)
    
    hahhahha, ich auch!!! :D
- rosti
  
  2023-05-16 10:12
  
  User since
  2011-03-19
  3472 Artikel
  BenutzerIn
  
  Übrigens: DBI->connect_cached sorgt dafür daß Du ab dem zweiten Verbindungsaufbau stets dasselbe DBHandle bekommst, also nicht neu verbunden wird. Inwieweit das zu Deinem Style passt musst Du selbst entscheiden. MFG

View all threads created 2017-08-01 14:09.