use Log::Dispatch; my $log = Log::Dispatch->new( outputs => [ [ 'Syslog', min_level => 'info', ident => 'Yadda yadda' ] ] ); $log->emerg("Time to die.");
This string will be prepended to all messages in the system log. Defaults to $0.
A string containing the log options (separated by any separator you like). See the openlog(3) and Sys::Syslog docs for more details. Defaults to ''.
Specifies what type of program is doing the logging to the system log. Valid options are 'auth', 'authpriv', 'cron', 'daemon', 'kern', 'local0' through 'local7', 'mail, 'news', 'syslog', 'user', 'uucp'. Defaults to 'user'
Tells what type of socket to use for sending syslog messages. Valid options are listed in "Sys::Syslog".
If you don't provide this, then we let "Sys::Syslog" simply pick one that works, which is the preferred option, as it makes your code more portable.
If you pass an array reference, it is dereferenced and passed to "Sys::Syslog::setlogsock()".
If you pass a hash reference, it is passed to "Sys::Syslog::setlogsock()" as is.
If this is set to a true value, then the calls to "setlogsock()", "openlog()", "syslog()", and "closelog()" will all be guarded by a thread-locked variable.
This is only relevant when running you are using Perl threads in your application. Setting this to a true value will cause the threads and threads::shared modules to be loaded.
This defaults to false.
I am also usually active on IRC as 'autarch' on "irc://irc.perl.org".
This is free software, licensed under:
The Artistic License 2.0 (GPL Compatible)
The full text of the license can be found in the LICENSE file included with this distribution.