Perl squid监控脚本
unless ($url && $proxy && $expectstatus) {print "Usage: url urluser urlpass proxy proxyport proxyuser proxypass expectstatus\n";
print " url -> The URL to check on the internet (http://www.google.com)\n";
print " urluser -> Username if the web site required authentication (- = none)\n";
print " urlpass -> Password if the web site required authentication (- = none)\n";
print " proxy -> Server that squid runs on (proxy.mydomain)\n";
print " proxyport -> TCP port that Squid listens on (3128)\n";
print " proxyuser -> Username if the web site required authentication (- = none)\n";
print " proxypass -> Password if the web site required authentication (- = none)\n";
print " expectstatus -> HTTP code that should be returned\n";
print " (2 = anything that begins with 2)\n";
exit -1;
}
页:
[1]