File: //proc/1/cwd/usr/local/cwaf/web/directadmin/admin/cwaf_catalog.pl
#!/usr/bin/perl -w
## load Comodo modules
BEGIN { require '/etc/cwaf/use_lib.pl' if -f '/etc/cwaf/use_lib.pl'; }
use Comodo::CWAF::Main;
use Comodo::CWAF::Platform;
use Comodo::CWAF::Excludes;
use Comodo::CWAF::CatalogUpdate;
require "$conf{'cwaf_path'}/web/cwaf_sharedlib.pl";
use strict;
no warnings "once";
no warnings "redefine";
our (%conf, %msconf, $pr_name);
#redefine log function
$pr_name = get_name();
open(LOGFILE, ">>$conf{'log_dir'}/$conf{'utils_log'}");
#LOGFILE->autoflush(1);
$| = 1;
##################################### BEGIN ##################################
&print_catalog_main();
####################################### END ######################################