Bug #94723 for libwww-perl:

Here are details. Linux curl output curl http://udbars-wc-01.sys.comcast.net:4090/healthCheck OKServer is healthy"1.8.0-j /usr/lib/nagios/plugins/check_http_ars 4090 CRITICAL, 500 Can't connect to http://udbars-wc-01.sys.comcast.net:4090/healthCheckWithVersion (Connection refused) Perl code that use get method use strict; use warnings; use LWP; use Sys::Hostname; my $host = hostname; my $port = $ARGV[0]; if (not defined $port) { die "Port not defined\n"; } chomp $port; my $url = "http://$host:$port/healthCheckWithVersion"; my $agent = LWP::UserAgent->new; my $request = HTTP::Request->new(GET => $url); my $response = $agent->request($request); if ($response->is_success) { my $output = $response->content; chomp $output; my @lines = split (/\n/, $output); my $out = $lines[1]; chomp $out; my $status = substr $out, 1, -29; chomp $status; if ($status =~ /OK/) { print "$out"; exit 0; } elsif ($status !~ /OK/) { print "CRITICAL, ARS NOT-Healthy, $out"; exit 2; } } else { print "CRITICAL, 500 Can't connect to $url (Connection refused)"; exit 2; }

So curl works fine but get method from perl gives HTTP 500

Actually both works, sorry i did not include the that perl is using but both works with curl Here: [root@udbars-wc-01 plugins]# ./check_http -I 172.28.88.181 -p 4090 -u /ping -r pong -w 2 -c 5 HTTP OK: HTTP/1.0 200 OK - 87 bytes in 0.000 second response time |time=0.000421s;2.000000;5.000000;0.000000 size=87B;;;0 [root@udbars-wc-01 plugins]# curl http://udbars-wc-01.sys.comcast.net:4090/healthCheck OKServer is healthy"1.8.0-j[root@udbars-wc-01 plugins]# [root@udbars-wc-01 plugins]# [root@udbars-wc-01 plugins]# curl http://udbars-wc-01.sys.comcast.net:4090/healthCheckWithVersion OKfServer is healthy"1.8.0-j*?