GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages
Log::Syslog::Fast(3) User Contributed Perl Documentation Log::Syslog::Fast(3)

Log::Syslog::Fast - Perl extension for sending syslog messages over TCP, UDP, or UNIX sockets with minimal CPU overhead.

  use Log::Syslog::Fast ':all';
  my $logger = Log::Syslog::Fast->new(LOG_UDP, "127.0.0.1", 514, LOG_LOCAL0, LOG_INFO, "mymachine", "logger");
  $logger->send("log message", time);

This module sends syslog messages over a network socket. It works like Sys::Syslog in setlogsock's 'udp', 'tcp', or 'unix' modes, but without the significant CPU overhead of that module when used for high-volume logging. Use of this specialized module is only recommended if 1) you must use network syslog as a messaging transport but 2) need to minimize the time spent in the logger.

This module supercedes the less general Log::Syslog::UDP.

Log::Syslog::Fast->new($proto, $hostname, $port, $facility, $severity, $sender, $name);
Create a new Log::Syslog::Fast object with the following parameters:
$proto
The transport protocol: one of LOG_TCP, LOG_UDP, or LOG_UNIX.

If LOG_TCP or LOG_UNIX is used, calls to $logger->send() will block until remote receipt of the message is confirmed. If LOG_UDP is used, the call will never block and may fail if insufficient buffer space exists in the network stack (in which case an exception will be thrown).

With LOG_UNIX, ->new will first attempt to connect with a SOCK_STREAM socket, and then try a SOCK_DGRAM if that is what the server expects (e.g. rsyslog).

$hostname
For LOG_TCP and LOG_UDP, the destination hostname where a syslogd is running. For LOG_UNIX, the path to the UNIX socket where syslogd is listening (typically /dev/log).
$port
For LOG_TCP and LOG_UDP, the destination port where a syslogd is listening, usually 514. Unused for LOG_UNIX, but should not be undefined or a warning will be emitted under strict.
$facility
The syslog facility constant, eg 16 for 'local0'. See RFC3164 section 4.1.1 (or <sys/syslog.h>) for appropriate constant values. See EXPORTS below for making these available by name.

The priority value is computed from the facility and severity per the RFC.

$severity
The syslog severity constant, eg 6 for 'info'. See RFC3164 section 4.1.1 (or <sys/syslog.h>) for appropriate constant values. See EXPORTS below for making these available by name.
$sender
The originating hostname. Sys::Hostname::hostname is typically a reasonable source for this.
$name
The program name or tag to use for the message.
$logger->send($logmsg, [$time])
$logger->emit($logmsg, [$time])
Send a syslog message through the configured logger. If $time is not provided, time(2) will be called for you. That doubles the syscalls per message, so try to pass it if you're already calling time() yourself.

->send may throw an exception if the system call fails (e.g. the transport becomes disconnected for connected protocols, or the kernel buffer is full for unconnected). For this reason it is usually wise to wrap calls with an exception handler. Likewise, calling ->send from a $SIG{__DIE__} handler is unwise.

emit is an alias for send.

NEWLINE CAVEAT

Note that send does not add any newline character(s) to its input. You will certainly want to do this yourself for TCP connections, or the server will not treat each message as a separate line. However with UDP the server should accept a message without a trailing newline (though some implementations may have difficulty with that).

$logger->set_receiver($proto, $hostname, $port)
Change the protocol, destination host, and port. This will force a reconnection in LOG_TCP or LOG_UNIX mode.
$logger->set_priority($facility, $severity)
Change both the syslog facility and severity.
$logger->set_facility($facility)
Change only the syslog facility.
$logger->set_severity($severity)
Change only the syslog severity.
$logger->set_sender($sender)
Change what is sent as the hostname of the sender.
$logger->set_name($name)
Change what is sent as the name of the sending program.
$logger->set_pid($name)
Change what is sent as the process id of the sending program.
$logger->set_format($format)
Change the message format. This should be either the constant LOG_RFC3164 (the default) or LOG_RFC5424 or LOG_RFC3164_LOCAL (without HOSTNAME).
$logger->get_priority()
Returns the current priority value.
$logger->get_facility()
Returns the current facility value.
$logger->get_severity()
Returns the current severity value.
$logger->get_format($format)
Returns the current message format.

If the remote syslogd is unreachable, certain methods may throw an exception or raise a signal:
  • LOG_TCP

    If the server is unreachable at connect time, ->new will fail with an exception. If an established connection is closed remotely, ->send will fail with an exception.

  • LOG_UDP

    As UDP is connectionless, ->new will not throw an error as no attempt to connect is made then. However, if the remote server starts or becomes unreachable and 1) the host is alive but 2) not listening on the specified port, and 3) ICMP packets are routable to the client, an exception may be thrown by ->send; note that this may happen only on the second call, and subsequently every other one. This behavior also depends on specific kernel interactions.

  • LOG_UNIX

    With both SOCK_STREAM- and SOCK_DGRAM-based servers, ->new will throw an exception if the socket is missing or not connectable.

    With SOCK_DGRAM, ->send to a peer that went away will throw. With SOCK_STREAM, ->send to a peer that went away will raise SIGPIPE.

Use Log::Syslog::Constants to export priority constants, e.g. LOG_INFO.

Log::Syslog::Constants

Sys::Syslog

LOG_UNIX with SOCK_DGRAM has not been well tested.

Adam Thomason, <athomason@cpan.org>

Copyright (C) 2009-2011 by Say Media, Inc.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.5 or, at your option, any later version of Perl 5 you may have available.

2019-12-16 perl v5.32.1

Search for    or go to Top of page |  Section 3 |  Main Index

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with ManDoc.