perl記錄日誌

2021-07-04 12:38:12 字數 1442 閱讀 2764

寫程式時,列印日誌是非常好的習慣,對我們排錯,查問題非常有用.平時我們喜歡自己寫個函式來處理日誌,要麼直接 print .在 perl 中有個專門處理日誌的模組叫 log::log4perl 這個是個重量級的傢伙,所以不喜歡,配置的可讀性也不怎麼樣.

但他和作業系統一樣,提供了幾個級別的日誌 fatal, error, warn, info,debug, trace 幾個日誌級別給我們使用,我們可以根據不同的時候使用不同的級別來輸出不同的內容.

我現在要介紹乙個小模組 log::minimal 也達到上面的功能.這個提供 debug、info、warn、critical 這幾個級別的日誌給我們使用.

使用 log::minimal 的好處

基本使用方法

使用非常簡單,直接 use 後就能使用.

#!/usr/bin/perl

usestrict;

usewarnings;

uselog::minimal;

critf("foo");

warnf("foo");

infof("foo");

debugf("foo");

輸出的內容如下:

2011-05-25t14:21:51 [critical] foo at t.pl line 6

2011-05-25t14:21:51 [warn] foo at t.pl line 7

2011-05-25t14:21:51 [info] foo at t.pl line 8

預設只顯示 info 級別以上的日誌.如果要顯示 info 以下的日誌,可以直接使用環境變數 $env

$

lm_debug=1 perl log.pl

2011-05-25t14:23:15

[critical] foo at t.pl line 6

2011-05-25t14:23:15

[warn]

foo at t.pl line 7

2011-05-25t14:23:15

[info] foo at t.pl line 8

2011-05-25t14:23:15

[debug] foo at t.pl line 9

修改日誌列印級別

想修改顯示級別,讓更加多的日誌顯示的話

1

local$log::minimal::log_level

= "info";

修改日誌列印的格式

local$log::minimal::print=sub"$time

[$type] $message at $trace\n";

};

php全面記錄日誌 php記錄日誌

簡介 這是php記錄日誌的詳細頁面,介紹了和php,有關的知識 技巧 經驗,和一些php原始碼等。class pingjiaf frameborder 0 src scrolling no ss log level 0 ss log filename tmp ss log ss log levels...

Perl最佳實踐 閱讀記錄

控制結構 子程式正規表示式 namespace noun adjective adjective noun adjective noun package disk package disk audio package disk rewritable variable adjective noun m...

Perl 正則匹配經驗記錄

0.正則匹配字典 1.重新定義字串分隔符為 2.perl 中 ms,msg,gms是什麼意思?正規表示式中,msg和 gms意思一樣。g表示找出字串中所有匹配的部分,如 x cat dog house words x w g 結果 word 0 cat word 1 dog word 2 house...