start.cgi

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

#!/usr/local/bin/perl
# start.cgi
# Start bind 8

require './bind8-lib.pl';
%access = &get_module_acl();
$access{'ro'} && &error($text{'start_ecannot'});
system("$config{'named_path'} -c $config{'named_conf'} >/dev/null </dev/null");
&redirect("");