Perl

提供: fukudat.net
2019年9月3日 (火) 14:57時点におけるFukudat (トーク | 投稿記録)による版 (→‎Syslog)
ナビゲーションに移動検索に移動

Perl に関する覚書。

Database Interface

DBI を使う。データベースの種類ごとに driver をインストールする。 MySQLなら、MySQLの開発省ライブラリを事前にインストールが必要となる。

Install (Ubuntuの場合)

$ sudo apt-get install libmysql++-dev libmysql++3v5 libmysqlclient-dev
$ sudo cpan DBI DBD::mysql 

Syslog

Syslogにログを残したいときは、Sys::Syslog を使う。

Install

$ sudo cpan Sys::Syslog

使い方

use Sys::Syslog qw(:standard :macros :extended);

setlogsock('unix');
openlog("$cmd $$",  'ndelay',  'user');
setlogmask(
    LOG_MASK(LOG_CRIT) |
    LOG_MASK(LOG_ERR) |
    LOG_MASK(LOG_WARNING) |
    LOG_MASK(LOG_INFO) |
    0
);

syslog 'info', "log message";