Hallo,
ich verwende fuer verschiedene Perl Programme, die als Daemon laufen, folgenden Schnipsel um ein Logbuch mit verschiedenen Werten des Programms zu erhalten:
open(LOG1, „>>$mypfad/protokoll“;
open(STDOUT, „>>&LOG1“);
print '************ ‚.$program.‘ Gestartet: '.time()."\n";
…
print …
Das funktioniert auch super und hat sich lange bewaehrt.
Nun befasse ich mich mit der Modul-Programmierung.
Dabei moechte ich das gleiche in einem Modul einbauen, das bei jedem Modulaufruf eine eigene Datei verwendet (deshalb > statt vorher >>:wink:.
open(LOG1, „>$mypfad/protokoll.time()“;
open(STDOUT, „>&LOG1“);
print '************ ‚.$program.‘ Gestartet: '.time()."\n";
…
print …
Aber immer wenn ich diesen Schnipsel in das Modul einbaue dann funktioniert es nicht mehr. Ich bekomme im error_log nur den Hinweis:
Name „DocSend2::LOG1“ used only once: possible typo at main line 24
Aber da das ja nur eine Warning ist, duerfte es kein wirkliches Problem sein. Die Rechte fuer den Ordner in den die Logdatei geschrieben werden soll sind auf 777 gesetzt
Jedenfalls bricht das Modul immer ab (und ich kann nicht herausfinden wo oder weshalb) und wird nicht ausgefuehrt und es wird auch nichts in den entsprechenden Ordner fuer die Logdateien geschrieben.
Hat jemand eine Idee, wie ich da weiterkommen kann?
Christian