Hallo zusammen!

Also, ich habe bei mir folgendes Problem: fuer eine Anwendung die auf ner DB arbeitet habe ich mir eine eigene Database-Klasse geschrieben, die von DBI.pm erbt (our @ISA = ("DBI")). Sinn und Zweck des ganzen ist es, fuer die Anwedung transparent die DBI-Funktionen zu nutzen, dabei allerdings die ausgefuehrten SQL-Kommandos mitzuprotokollieren. Bis auf eine Sache klappt das auch ganz gut. Problematisch wirds bei der Benutzung von $sth = $dbh->prepare() mit einem anschliessenden $sth->execute. Das von prepare zurueckgegebene Statement Handle ist natuerlich nicht mehr von meiner Klasse sondern von DBD::st. Deshalb wird der Aufruf von execute momentan am Logging vorbeigeschleust.
Meine Problem ist nun, wie ich es hinbekomme, dass beim Aufruf von $sth->execute erst meine execute aufgerufen wird, die die Parameter mitloggt und dann die echte execute-Funktion aufruft.
Vielen Dank fuer eure Hilfe!

Ciao,
Nepos

Mach noch eine Hilfsklasse...

in etwas so:



ungetestet!

edit: so ähnlich musst Du das dann halt mit allen DBD::st-Methoden machen...\n\n

<!--EDIT|renee|1126172228-->

[quote=nepos,08.09.2005, 11:19]Sinn und Zweck des ganzen ist es, fuer die Anwedung transparent die DBI-Funktionen zu nutzen, dabei allerdings die ausgefuehrten SQL-Kommandos mitzuprotokollieren.[/quote]
DBI kann sowas schon:
perldoc DBI
stichwort trace

von DBI wuerde ich eher nicht direkt erben, sondern besser eine has-a-relationship verwenden (ev. die DBI-Methoden, die 1:1 aufgerufen werden sollen, mit einem AUTOLOAD-Wrapper (+ ev. verankerung in Symboltabelle) nachbilden

@pq: So ausfuehrlich wie das DBI-trace wollte ich das nicht :) Mich interessiert nur, wann wurde welches Kommando ausgefuehrt, war es erfolgreich, wie lange hats gebraucht und von wo aus wurde es abgesetzt.

@Strat: Was spricht dagegen von DBI zu erben?

Generell, wenns zu aufwendig wird, lass ich das weg. Ich denke, ich werd eh recht wenig mit prepare+execute machen muessen.

ich wuerde deshalb nicht direkt von DBI erben, weil es recht aufwendig ist (bzw. sein kann), an all die methoden dran zu kommen, weil die in verschiedenen packages liegen (DBI::db, DBI::st, ...), und da muesste man von diesen ganzen klassen erben. Ich weiss nicht, ob es da nicht mal bei einem update von DBI aenderungen geben kann (ist wohl aber eher unwahrscheinlich).

Deshalb bevorzuge ich da eine has-a-relationship mit optionalem wrapper (autoload mit can funktionierte bei mir recht gut)\n\n

<!--EDIT|Strat|1126191413-->

Ach so. Naja, fuer die Sachen, die ich in dem Fall brauche klappts einwandfrei. Das einzige Problem ist wie gesagt die Sache mit den Statement Handles und das scheint wohl eines der Probleme zu sein, die du ansprichst.