wehub-resource-sync
18 lines
478 B
Perl
Executable File
18 lines
478 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Start Kea services.
|
|
|
|
use strict;
|
|
use warnings;
|
|
require './kea-dhcp-lib.pl'; ## no critic
|
|
our %text;
|
|
&error_setup($text{'eacl_aviol'});
|
|
my %access = &get_module_acl();
|
|
&error("$text{'eacl_np'} $text{'eacl_papply'}") if (!$access{'apply'});
|
|
|
|
# The header action buttons operate on all configured Kea components together.
|
|
&error_setup($text{'start_fail'});
|
|
my $err = &kea_run_action('start');
|
|
&error($err) if ($err);
|
|
&webmin_log("start");
|
|
&redirect("");
|