1270866Simp# The client writes a message to Sys::Syslog native method. 2270866Simp# The syslogd writes it into a file and through a pipe. 3270866Simp# The syslogd does not pass it via invalid IPv4 UDP to the loghost. 4270866Simp# Find the message in client, file, pipe, syslogd log. 5270866Simp# Check that the syslogd logs the error. 6270866Simp 7270866Simpuse strict; 8270866Simpuse warnings; 9270866Simp 10270866Simpour %args = ( 11270866Simp syslogd => { 12270866Simp loghost => '@invalid://127.0.0.1', 13270866Simp loggrep => { 14270866Simp qr/syslogd\[\d+\]: bad protocol "\@invalid:\/\/127.0.0.1"/ => 1, 15270866Simp get_testgrep() => 1, 16270866Simp }, 17270866Simp }, 18270866Simp server => { 19270866Simp noserver => 1, 20270866Simp }, 21270866Simp); 22270866Simp 23270866Simp1; 24270866Simp