cachemgr.cgi

来自「Unix下基于Web的管理工具」· CGI 代码 · 共 21 行

#!/usr/local/bin/perl
# cachemgr.cgi
# Run the squid cachemgr.cgi program

require './squid-lib.pl';
$mgr = $config{'cachemgr_path'};
if (&has_command($mgr)) {
	$| = 1;
	system($mgr, @ARGV);
	}
else {
	&header("Error", "");
	print "<hr>\n";
	print "The Squid cache manager program <tt>$mgr</tt> was not found\n";
	print "on your system. Maybe your <a href=/config.cgi?$module_name>module\n";
	print "configuration</a> is incorrect. <p>\n";
	}
print "<hr>\n";
&footer("", "squid index");