From: Thomas Guyot-Sionnest Date: Fri, 18 May 2007 07:17:59 +0000 (+0000) Subject: Make check_tcp.t compatible with picky web servers. X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=15a018f87d8f8f6d8723f16feb1cb3d2877c3375;p=nagiosplug.git Make check_tcp.t compatible with picky web servers. git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@1714 f882894a-f735-0410-b71e-b25c423dba1c --- diff --git a/plugins/t/check_tcp.t b/plugins/t/check_tcp.t index c38fca7..2914350 100644 --- a/plugins/t/check_tcp.t +++ b/plugins/t/check_tcp.t @@ -34,7 +34,7 @@ $t += checkCmd( "./check_tcp $hostname_invalid -p 80 -wt 0 -ct 0 -to 1", 2 # Need the \r\n to make it more standards compliant with web servers. Need the various quotes # so that perl doesn't interpret the \r\n and is passed onto command line correctly -$t += checkCmd( "./check_tcp $host_tcp_http -p 80 -E -s ".'"GET /\r\n\r\n"'." -e 'ThisShouldntMatch' -j", 1, $failedExpect ); +$t += checkCmd( "./check_tcp $host_tcp_http -p 80 -E -s ".'"GET / HTTP/1.1\r\n\r\n"'." -e 'ThisShouldntMatch' -j", 1, $failedExpect ); exit(0) if defined($Test::Harness::VERSION); exit($tests - $t);