O'Reilly logo

Programmieren mit Perl by Jon Orwant, Tom Christiansen, Larry Wall

Stay ahead with the world's most comprehensive technology and business learning platform.

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

Start Free Trial

No credit card required

Sys::Syslog

use Sys::Syslog;                          # Läßt setlogsock aus.
use Sys::Syslog qw(:DEFAULT setlogsock);  # Berücksichtigt auch setlogsock.

openlog($program, 'cons,pid', 'user');
syslog('info', 'Dies ist ein Test');
syslog('mail |warning', 'Dies ist ein besserer Test: %d', time());
closelog();

syslog('debug', 'Dies ist der letzte Test');

setlogsock('unix');
openlog("$program $$", 'ndelay', 'user');
syslog('info', 'Problem war %m'); # %m == $! im syslog-Chinesisch.
syslog('notice', 'fooprogram: Ich habe fertig.');

setlogsock("unix");               # "inet" oder "unix"
openlog("myprogname", $logopt, $facility);
syslog($priority, $format, @args);
$oldmask = setlogmask($mask_priority);
closelog();

Das Sys::Syslog-Modul verhält sich wie die syslog (3)-Funktion Ihrer C-Bibliothek, ...

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

Start Free Trial

No credit card required