restart.cgi

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

#!/usr/local/bin/perl
# restart.cgi
# Restart the running squid process

require './squid-lib.pl';
&ReadParse();
$whatfailed = "Failed to reconfigure squid";
$out = `$config{'squid_path'} -f $config{'squid_conf'} -k reconfigure 2>&1`;
if ($out) { &error("<pre>$out</pre>"); }
&redirect($in{'redir'});