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

rosti

2017-08-01 20:09

User since
2011-03-19
3496 Artikel
BenutzerIn

Idee: Das Databasehandle kommt mit der Instanz:

Code (perl): (dl )

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)