# The syslogd binds UDP socket on ::1. # The client writes a message into a ::1 UDP socket. # The syslogd writes it into a file and through a pipe. # The syslogd passes it via UDP to the loghost. # The server receives the message on its UDP socket. # Find the message in client, file, pipe, syslogd, server log. # Check that the file log contains the localhost name. # Check that fstat contains a bound UDP socket. use strict; use warnings; use Socket; our %args = ( client => { connect => { domain => AF_INET6, addr => "::1", port => 514 }, }, syslogd => { options => ["-U", "[::1]"], fstat => { qr/^root .* internet/ => 0, qr/^_syslogd .* internet/ => 3, qr/ internet6 dgram udp \[::1\]:514$/ => 1, }, }, file => { loggrep => qr/ localhost /. get_testgrep(), }, ); 1;