mirror of
https://github.com/opinkerfi/nagios-plugins.git
synced 2024-11-05 01:53:44 +01:00
Perfdata added to check_squid.pl
This commit is contained in:
parent
773cfede2b
commit
d0fccf6649
@ -22,6 +22,7 @@ use utils qw($TIMEOUT %ERRORS &print_revision &support &usage);
|
||||
use LWP::UserAgent;
|
||||
use HTTP::Request::Common qw(POST GET);
|
||||
use HTTP::Headers;
|
||||
use Time::HiRes;
|
||||
my ($url, $urluser, $urlpass, $proxy, $proxyport,
|
||||
$proxyuser, $proxypass, $expectstatus, $res, $req);
|
||||
|
||||
@ -88,13 +89,17 @@ if ($urluser)
|
||||
$h->authorization_basic($urluser, $urlpass);
|
||||
}
|
||||
|
||||
$t0 = [gettimeofday];
|
||||
|
||||
$req = HTTP::Request->new('GET', $url, $h);
|
||||
|
||||
$res = $ua->request($req);
|
||||
|
||||
$elapsed = tv_interval ( $t0 );
|
||||
|
||||
if ($res->status_line =~ /^$expectstatus/)
|
||||
{
|
||||
print "OK - Status: ".$res->status_line."\n";
|
||||
print "OK - Status: ".$res->status_line. " | 'response'=$elapsed\n";
|
||||
exit $ERRORS{"OK"};
|
||||
}
|
||||
else
|
||||
|
Loading…
Reference in New Issue
Block a user