diff options
| author | Thomas Guyot-Sionnest <dermoth@users.sourceforge.net> | 2007-05-18 07:17:59 (GMT) |
|---|---|---|
| committer | Thomas Guyot-Sionnest <dermoth@users.sourceforge.net> | 2007-05-18 07:17:59 (GMT) |
| commit | 15a018f87d8f8f6d8723f16feb1cb3d2877c3375 (patch) | |
| tree | 2ab608fdfa2f1599192e86b398b4c59bca601077 | |
| parent | 88091d3db598a4c852459318f47cf48a1116f50b (diff) | |
| download | monitoring-plugins-15a018f87d8f8f6d8723f16feb1cb3d2877c3375.tar.gz | |
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
| -rw-r--r-- | plugins/t/check_tcp.t | 2 |
1 files changed, 1 insertions, 1 deletions
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 | |||
| 34 | 34 | ||
| 35 | # Need the \r\n to make it more standards compliant with web servers. Need the various quotes | 35 | # Need the \r\n to make it more standards compliant with web servers. Need the various quotes |
| 36 | # so that perl doesn't interpret the \r\n and is passed onto command line correctly | 36 | # so that perl doesn't interpret the \r\n and is passed onto command line correctly |
| 37 | $t += checkCmd( "./check_tcp $host_tcp_http -p 80 -E -s ".'"GET /\r\n\r\n"'." -e 'ThisShouldntMatch' -j", 1, $failedExpect ); | 37 | $t += checkCmd( "./check_tcp $host_tcp_http -p 80 -E -s ".'"GET / HTTP/1.1\r\n\r\n"'." -e 'ThisShouldntMatch' -j", 1, $failedExpect ); |
| 38 | 38 | ||
| 39 | exit(0) if defined($Test::Harness::VERSION); | 39 | exit(0) if defined($Test::Harness::VERSION); |
| 40 | exit($tests - $t); | 40 | exit($tests - $t); |