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 does not pass it via invalid IPv4 UDP to the loghost. 4# Find the message in client, file, pipe, syslogd log. 5# Check that the syslogd logs the error. 6 7use strict; 8use warnings; 9 10our %args = ( 11 syslogd => { 12 loghost => '@invalid://127.0.0.1', 13 loggrep => { 14 qr/syslogd\[\d+\]: bad protocol "\@invalid:\/\/127.0.0.1"/ => 1, 15 get_testgrep() => 1, 16 }, 17 }, 18 server => { 19 noserver => 1, 20 }, 21); 22 231; 24