File: //usr/local/cwaf/web/directadmin/admin/index.pl
#!/usr/bin/perl
# start main
use CGI qw/:standard/;
use warnings;
use strict;
no warnings "once";
no warnings "redefine";
BEGIN { require '/etc/cwaf/use_lib.pl' if -f '/etc/cwaf/use_lib.pl'; }
use Comodo::CWAF::Main;
use Comodo::CWAF::ClientAPI;
use Comodo::CWAF::ModSecurity;
use Comodo::CWAF::Platform;
require "$conf{'cwaf_path'}/web/cwaf_sharedlib.pl";
#"/usr/local/cwaf/web/cwaf_sharedlib.pl";
## define variables
# global HASH for configuration data
our (%conf,%msconf,$pr_name);
$pr_name = get_name();
#redefine log function
local *do_log = \&do_log_stderr;
# BEGIN
$| = 1;
##################################### BEGIN ##################################
print '<div id="DAtitle"><h1><b>Web Application Firewall | Free ModSecurity Rules from Comodo</b></h1></div>';
&print_main_interface();
# end main
###############################################################################
1;