GeoHelm/legacy/start.cgi

14 lines
300 B
Plaintext
Raw Normal View History

2024-01-27 19:04:46 +00:00
#!/usr/bin/perl
require './geohelm-lib.pl'; #require
&ReadParse();
&error_setup($text{'start_err'});
my ($rc, $err) = tomcat_service_ctl('start');
if ($rc != 0){
&ui_print_header(undef, $text{'index_title'}, "");
&error($err);
&ui_print_footer("", $text{'index_return'});
exit;
}
&redirect("");