Sys/Syslog/Syslog.pm

93 my $transmit_ok = 0;            # flag to indicate if the last message was transmited
96 my $ident = '';                 # identifiant prepended to each message
308     my ($message, $buf);
365     $message = @_ ? sprintf($mask, @_) : $mask;
369     chomp $message if $^O =~ /darwin/;
372         $buf = $message;
375         $buf = $message;
386         $buf = "<$sum>$timestamp $whoami: $message\0";
392         chomp $message;
395         print STDERR "$whoami: $message\n";
645     # way to do that is to send a message and see if an ICMP is returned
892 C<$ident> is prepended to every message.  C<$logopt> contains zero or
918 opened when the first message is logged).
929 while logging the message.  (The GNU C library does not create a child
934 C<perror> - Write the message to standard error output as well to the
939 C<pid> - Include PID with each message.
954 =item B<syslog($priority, $message)>
958 If C<$priority> permits, logs C<$message> or C<sprintf($format, @args)>
959 with the addition that C<%m> in $message or C<$format> is replaced with
960 C<"$!"> (the latest error message).
974     syslog("info", $message);           # informational level
975     syslog(LOG_INFO, $message);         # informational level
977     syslog("info|local0", $message);        # information level, Local0 facility
978     syslog(LOG_INFO|LOG_LOCAL0, $message);  # information level, Local0 facility
984 C<Sys::Syslog> version v0.07 and older passed the C<$message> as the
988 C<syslog($priority, "%s", $message)> instead of C<syslog($priority,
989 $message)>.  This protects against hostile formatting sequences that
990 might show up if $message contains tainted data.
1320 C<LOG_INFO> - informational message
1324 C<LOG_DEBUG> - debug-level message