Datei :: log. Ein einfacher Objektorientierter Logger
Jetzt downloaden

Datei :: log. Ranking & Zusammenfassung

Datei :: log. Stichworte

Perl-Modul Perl Logger objektorientierten Logdaten objektorientierte Logger

Datei :: log. Beschreibung

Ein einfacher Objektorientierter Logger Datei :: Protokoll ist eine Perl-Klasse, die Methoden zur Protokollierung von Daten in einer Datei bereitstellt. Es gibt eine Reihe von Parametern, die übergeben werden können, um die Konfiguration des logger.synopsis zu ermöglichen. Datei :: log; # Hübsches Format, alle Parameter, die meine $ log = Datei :: log-> neu ({debug => 4, # Legen Sie den Debug-Level logfileName => 'mylogfile.log', # Definieren Sie den Protokolldateinamen LogFilemode => '>' , # '>>' Anhängen oder '>' überschreiben dateTimestamp => 1, # Zeitstempel-Protokolldateneinträge stderrredirect => 1, # Umleiten von stderr in der Protokolldatei DefaultFile => 1, # Verwenden Sie die Protokolldatei als Standarddatei als Standard-DateiHandle LogFileDatetime = > 1, # Zeitstempel Der Protokolldateiname Appname => 'myApplicationName', # Der Name der Anwendung PIDSTAMP => 1, # stempeln Sie die Protokolldaten mit der Prozess-ID StoreExptext => 1, # speichern intern Alle exp-Text MsgPrepend => ' ', # Text, um sich mit jeder Meldung vorzuordnen ) # Methode }); # Minimale Instanz, Logfile-Name basierend auf Anwendungsnamen My $ log = file :: log-> neu (); # Typische Verwendung, Legen Sie den Debug-Level fest und den Protokolldateinamen (sagen Sie aus einer Konfigurationsdatei) My $ log = file :: log-> neu (debug => $ debuglevel, logfileName => $ logfileName,); # Nachricht drucken in die Protokolldatei, wenn das Debug> = 2 $ log-> msg (2, "In der Protokolldatei hinzugefügt werden soll, falls debugg> = 2 \ n"); # Nachricht drucken in die Protokolldatei, wenn das Debug> = 2 ist (aber auf einem Perl6-Way) $ log-> SAY (2, "In der Protokolldatei hinzufügen, falls debugg> = 2"); # Drucken Sie eine Ausnahme-Nachricht (Fehler) an die Protokolldatei $ log-> exp ("Etwas ging schief \ N"); # Schließen Sie die Protokolldatei (optional an der Exit) $ log-> close (); # Ändern Sie das Debug-Level, erfassen Sie den alten Wert $ OlddebugValue = $ log-> debugvalue ($ newdebugvalue); $ currentdebugValue = $ log-> debugvalue (); # Holen Sie sich alle Ausnahmen Text (Sie können also mit all den Fehlern etwas tun, z. B. E-Mail) $ allexceptions = $ log-> getExptionxt (); $ coughErrors = $ log-> expcnt (); # Wie oft hat $ log-> exp als Anforderung aufgerufen: · Perl. Was ist neu in dieser Version: · Aktualisiert MakeFile.PL, um den CPAN-Test von CPAN-Tester-Fehler aufzuwenden. Kein Code ändert sich

Datei :: log. Zugehörige Software