Archivo :: Registro Un registrador de objetos simple orientado
Descargar ahora

Archivo :: Registro Clasificación y resumen

Archivo :: Registro Etiquetas

Módulo perl perla registrador orientado a objetos Dato de registro logger orientado a objetos

Archivo :: Registro Descripción

Un simple registrador orientado a objetos Archivo :: Log es una clase Perl que proporciona métodos para registrar datos en un archivo. Hay una serie de parámetros que se pueden pasar para permitir la configuración del registrador.Synopsis Use el archivo :: Log; # Bonito formato, todos los parámetros My $ Log = Archivo :: LOG-> NUEVO ({debug => 4, # Configure el NIBLO DE DEBUG LOGFILENAME => 'MYLOGFILE.LOG', # Defina el nombre de archivo LogFileMode => '>' , # '>>' Anexar o '>' sobrescribe datos DataTimestamp => 1, # Timestamp Registrar las entradas de datos STEDRREDRECT => 1, # Redirect STDERR al archivo de registro de defaMeTFile => 1, # Use el archivo de registro como el archivo FileHandle LogFiledimeTime = > 1, # Timestamp El nombre de archivo de archivo appName => 'MyApplicationName', # el nombre de la aplicación PidStamp => 1, # sella los datos de registro con el procesamiento ID STOREEExpText => 1, # Tienda Internamente todos EXP TEXT MSGPREPEND => ' ', # Texto para preparar a cada mensaje DIGA => 1, # MSG () y EXP () Actúa como el comando PERL6 DIGA # (DEFAULT OFF) solicitado por AALEEM JIWA # Sin embargo, podría ser mejor utilizar la opinión ( ) # Método}); # Instancia mínima, nombre de archivo de registro basado en el nombre de la aplicación My $ log = Archivo :: Log-> Nuevo (); # Uso típico, configure el nivel de depuración y el nombre de archivo de registro (digamos desde un archivo de configuración) MY $ LOG = Archivo :: Registro-> Nuevo (depuración => $ debuglevel, logfilename => $ logfilename,); # Imprimir mensaje al archivo de registro si la depuración es> = 2 $ log-> MSG (2 ", agregue esto al archivo de registro si se depura> = 2 \ n"); # Imprimir mensaje al archivo de registro Si la depuración es> = 2 (pero en una manera perl6) $ log-> Diga (2, "Agregue esto al archivo de registro si se depura> = 2"); # Imprimir un mensaje de excepción (error) al archivo de registro $ log-> exp ("Algo salió mal \ n"); # Cerrar el archivo de registro (opcional en la salida) $ log-> Cerrar (); # Cambie el nivel de depuración, capturando el valor anterior $ olddebugvalue = $ log-> DebugValue ($ NewDebugvalue); $ CurrentDebugvalue = $ log-> DebugValue (); # Obtenga todo el texto de excepciones (para que pueda hacer algo con todos los errores, por ejemplo, enviarlos por correo electrónico) $ ALExceptions = $ log-> getExpText (); $SERRORS = $ LOG-> Expcnt (); # Cuántas veces tiene $ log-> Exp ha sido llamados requisitos: · Perl ¿Qué hay de nuevo en este lanzamiento: · Actualizado makefile.pl para incluir a Prereq para codificar, ya que estaba obteniendo errores de probador de CPAN. Sin cambios de código

Archivo :: Registro Software relacionado