1# The client writes a message to Sys::Syslog native method. 2# The syslogd writes it into a file and through a pipe. 3# The syslogd passes it via explicit IPv6 UDP to localhost. 4# The server receives the message on its UDP socket. 5# Find the message in client, file, pipe, syslogd, server log. 6# Check that localhost gets resolved to the ::1 address. 7 8use strict; 9use warnings; 10use Socket; 11 12our %args = ( 13 syslogd => { 14 loghost => '@udp6://localhost:$connectport', 15 }, 16 server => { 17 listen => { domain => AF_INET6, addr => "::1" }, 18 }, 19); 20 211; 22