#!/usr/bin/perl
# start main
use CGI qw/:standard/;

use warnings;
use strict;
no warnings "once";
no warnings "redefine";

use IO::Handle;

## load Comodo modules
BEGIN { require '/etc/cwaf/use_lib.pl' if -f '/etc/cwaf/use_lib.pl'; }
use Comodo::CWAF::Platform;
use Comodo::CWAF::Main;
use Comodo::CWAF::ClientAPI;
use Comodo::CWAF::ModSecurity;

## define variables
# global HASH for configuration data
our (%conf, %msconf, $pr_name);

require "$conf{'cwaf_path'}/web/cwaf_sharedlib.pl";

$pr_name = get_name();

open(LOGFILE, ">>$conf{'log_dir'}/$pr_name.log");
LOGFILE->autoflush(1);

##################################### BEGIN ##################################
print '<div id="plesktitle"><h1><b>Web Application Firewall | Free ModSecurity Rules from Comodo</b></h1></div>';

&print_main_interface();

# end main
###############################################################################
1;