aboutsummaryrefslogtreecommitdiff
path: root/script/webcoso.pl
diff options
context:
space:
mode:
Diffstat (limited to 'script/webcoso.pl')
-rw-r--r--script/webcoso.pl4
1 files changed, 4 insertions, 0 deletions
diff --git a/script/webcoso.pl b/script/webcoso.pl
index a247be0..660d7dd 100644
--- a/script/webcoso.pl
+++ b/script/webcoso.pl
@@ -3,6 +3,7 @@ use strict;
use warnings;
use Getopt::Long;
use WebCoso::Common;
+use Log::Log4perl ':easy';
my $CLEAN=0;
@@ -11,6 +12,7 @@ my $res=GetOptions('src|s=s'=>\$WebCoso::Common::SRCPATH,
'dst|d=s'=>\$WebCoso::Common::DSTPATH,
'url|u=s'=>\$WebCoso::Common::DSTBASEURL,
'include|I=s'=>\@WebCoso::Common::TMPLPATH,
+ 'verbose|v+'=>\$WebCoso::Common::VERBOSITY,
'clean'=>\$CLEAN,
);
exit 1 unless $res;
@@ -18,6 +20,8 @@ $WebCoso::Common::SRCPATH=~s{/+$}{};
$WebCoso::Common::DSTPATH=~s{/+$}{};
$WebCoso::Common::DSTBASEURL=~s{/*$}{/};
}
+Log::Log4perl->easy_init({level=>$WebCoso::Common::VERBOSITY});
+
if ($CLEAN) {
require WebCoso::Cleaner;