mirror of
https://github.com/webmin/webmin.git
synced 2026-02-05 23:22:15 +00:00
16 lines
421 B
Perl
Executable File
16 lines
421 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# stop.cgi
|
|
# Stop the mon process
|
|
|
|
require './mon-lib.pl';
|
|
&ReadParse();
|
|
if($in{'action_mon'}=~/$text{'mon_stop'}/){
|
|
$out = &backquote_logged("/etc/init.d/mon stop 1>/dev/null 2>&1");
|
|
}elsif($in{'action_mon'}=~/$text{'mon_start'}/){
|
|
$out = &backquote_logged("/etc/init.d/mon start 1>/dev/null 2>&1");
|
|
}else{
|
|
$out = &backquote_logged("/etc/init.d/mon restart 1>/dev/null 2>&1");
|
|
}
|
|
&redirect("");
|
|
|