1#!/usr/local/bin/perl 2# Start the atd server 3 4require './at-lib.pl'; 5&error_setup($text{'start_err'}); 6$access{'stop'} || &error($text{'start_ecannot'}); 7&foreign_require("init"); 8my $init = &get_init_name(); 9my ($ok, $err) = &init::start_action($init); 10&error($err) if (!$ok); 11&webmin_log("start"); 12&redirect(""); 13 14 15