save_defines.cgi

Unix下基于Web的管理工具

#!/usr/local/bin/perl
# save_defines.cgi
# Save defined run-time httpd parameters

require './apache-lib.pl';
$access{'global'}==1 || &error($text{'defines_ecannot'});
&ReadParse();
$site{'defines'} = join(" ", split(/\s+/, $in{'defines'}));
&write_file("$module_config_directory/site", \%site);
&redirect("");