Files
webmin/sentry/start_portsentry.cgi
2007-04-12 20:24:50 +00:00

15 lines
356 B
Perl
Executable File

#!/usr/local/bin/perl
# start_portsentry.cgi
# Start the portsentry daemon
require './sentry-lib.pl';
&error_setup($text{'portsentry_starterr'});
$cmd = &portsentry_start_cmd();
$out = &backquote_logged("$cmd 2>&1 </dev/null");
&error("<tt>$out</tt>") if ($out =~ /failed|error/i);
&webmin_log("start", "portsentry");
&redirect("edit_portsentry.cgi");