Niveles de registro

(def fruit "Apple")

Instrucciones

En este ejercicio vas a procesar líneas de log.

Cada línea de log es un string con el siguiente formato: "[<LEVEL>]: <MESSAGE>".

Hay tres niveles de log diferentes:

• INFO
• WARNING
• ERROR

Tienes tres tareas; cada una recibirá una línea de log y te pedirá que hagas algo con ella.

1. Obtén el mensaje de una línea de log

Implementa la función message para que devuelva el mensaje de una línea de log:

(message "[ERROR]: Invalid operation")
;;=> "Invalid operation"

Cualquier espacio en blanco al principio o al final debe eliminarse:

(message "[WARNING]:  Disk almost full\r\n")
;;=> "Disk almost full"

2. Obtén el nivel de log de una línea de log

Implementa la función log-level para que devuelva el nivel de log de una línea de log, que debe devolverse en minúsculas:

(log-level "[ERROR]: Invalid operation")
;;=> "error"

3. Reformatea una línea de log

Implementa la función reformat que reformatea la línea de log, poniendo el mensaje primero y el nivel de log después, entre paréntesis:

(reformat "[INFO]: Operation completed")
;;=> "Operation completed (info)"