File: stop_mail.cgi

package info (click to toggle)
webmin-virtual-server 2.50-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 1,608 kB
  • ctags: 392
  • sloc: perl: 15,687; makefile: 95; sh: 8
file content (12 lines) | stat: -rwxr-xr-x 273 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
 
#!/usr/local/bin/perl
# stop_mail.cgi
# Shut down the mail server

require './virtual-server-lib.pl';
$access{'stop'} || &error($text{'stop_ecannot'});
&require_mail();
&error_setup($text{'mstop_err'});
&shutdown_mail_server();
&webmin_log("stop", "mail");
&redirect("");