#!/usr/bin/perl # Start up firewalld use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; require './firewalld-lib.pl'; our (%text, %in); &error_setup($text{'start_err'}); my $err = &start_firewalld(); &error($err) if ($err); &webmin_log("start"); &redirect("index.cgi?zone=".&urlize($in{'zone'}));