![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
以下の様なスクリプトでsyslogを出力したいのですが、出力することができません。どなたかご教授ください。
環境は
vine2.6r4
perl5.6.1
で、/etc/syslog.confにlocal4.* /var/log/hoge.logを追加後、syslogdを再起動しました。
プログラムを実行するとhoge.logファイルは出力されます。
また、logger -p local4.err messageでhoge.logにmessageが出力されることも確認済みです。
-------------
#!/usr/bin/perl -w
use strict;
use Sys::Syslog qw(:DEFAULT setlogsock);
# 実行ファイル名の取得
my ($prog_name) = $0;
$prog_name =~ s/(.*)\/(.*)/$2/;
# Sys::Syslogモジュールの引数
my($ident, $logopt, $facility);
my($ident) = $prog_name;
my($logopt) = 'ndelay';
my($facility) = 'local4';
# 処理開始
&put_syslog("info", "process start.");
sub put_syslog {
my($priority, $msg) = @_;
openlog($ident, $logopt, $facility) || die "put_syslog: can't open syslog\n";
syslog($priority, $msg);
closelog();
}
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- CGI perlで書いたcgiでsqliteの使い方を教えてください 2 2023/05/08 21:29
- ネットワーク syslog保存サーバーに蓄積するログファイル容量について 3 2023/01/09 20:13
- UNIX・Linux Linuxサーバーのパーティション・ディレクトリの推奨見積もりについて 3 2023/01/17 00:46
- JavaScript Javascriptが機能せず原因が分からないので教えて頂きたいです 3 2023/06/04 14:50
- 英語 英語ができる方に質問です。 以下の文がネイティブの方に伝わるかどうかを確認していただけないでしょうか 7 2022/12/16 14:54
- Perl perlをバージョンアップしたら、今まで正常に動いていたプログラムが、エラーになってしまった 3 2022/10/05 15:44
- HTML・CSS ボタンをクリックした時に、入力フォームのすぐ下部に、「入力欄が空白です」というテキストメッセージが表 1 2022/04/27 16:25
- UNIX・Linux cronの@rebootでのdateコマンドの実行につきまして 2 2023/06/11 16:23
- JavaScript 入力フォームの javascript で メールアドレスの正規チェックをを行い、ボタンをクリックして 2 2022/04/27 16:06
- 英語 この英語は正しいですか? 2 2023/07/01 14:58
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
INDIRECT 横に再度抽出したい
-
Wコロン
-
PerlでUTF-8のファイルの文字列...
-
Perlで、「が」を、「...
-
画像が表示でnull; this.src
-
ターミナルで特定の文字と文字...
-
EXCEL VBAでフォルダに多数のCSVファ...
-
MediBang Paint Proについて
-
アルファベットに付いて質問し...
-
#!/usr/bin/perlで書きだしたCG...
-
Perlのエラーについてご教授く...
-
perlのflock関数でロックをかけ...
-
AI sisterとは、偽物の人ですか?
-
bashスクリプト
-
ファイルアイコンの左下に緑の□...
-
perlプログラミング 空白行削除
-
perlでリテラル値はメモリにど...
-
perlで2次元配列をサブルーチ...
-
Perlで時間の計算
-
perlについて
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
テキストファイルで提出とは?
-
openした後、closeしないでプロ...
-
perlをバージョンアップしたら...
-
アルファベットに付いて質問し...
-
Perl の外部モジュールの利用方法
-
Strawberry Perl for Windows ...
-
Perlのエラーについてご教授く...
-
perlプログラミング 空白行削除
-
INDIRECT 横に再度抽出したい
-
Perlで時間の計算
-
Wallpaper Engineでおすすめの...
-
bashスクリプト
-
perlでリテラル値はメモリにど...
-
perlのプログラミング 部分入れ...
-
Perlで特定文字列から特定文字...
-
perl LWPでURLにアクセスした時...
-
perlで2次元配列をサブルーチ...
-
perlのrequireの動き方について...
-
ファイルアイコンの左下に緑の□...
-
C言語の問題について
おすすめ情報