Anki-Import
view release on metacpan or search on metacpan
lib/Anki/Import.pm view on Meta::CPAN
40414243444546474849505152535455565758596061626364656667686970717273747576777879
.
' the success message after a successful execution of the command.'
);
opt
verbose
=> (
isa
=>
'Bool'
,
alias
=>
'v'
,
comment
=>
'provide details on progress of Anki::Import'
);
opt
vverbose
=> (
isa
=>
'Bool'
,
alias
=>
'V'
,
comment
=>
'verbose information plus debug info'
);
# start here
sub
anki_import {
my
$args
= optargs(
@_
);
my
$file
=
$args
->{file};
if
(!
$file
) {
logf(
'Aborting: No file passed to Anki::Import.'
);
}
# set parent directory
my
$pd
=
$args
->{parent_dir};
# set log level as appropriate
if
(
$args
->{verbose}) {
set_log_level(
'info'
);
}
elsif
(
$args
->{vverbose}) {
set_log_level(
'debug'
);
}
else
{
set_log_level(
'error'
);
}
logi(
'Log level set'
);
# get and load the source file
logi(
'Loading file'
);
my
$path
= File::Spec->catfile(
$file
); logd(
$path
);
if
(! -e
$path
) {
logf(
"Aborting: Source file named '$path' does not exist."
);
share/log_config/anki-import.cfg view on Meta::CPAN
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384log4perl.rootLogger=TRACE, trace, debug, info,
warn
, error, fatal
#log4perl.logger.Module.Name=TRACE, trace, debug, info, warn, error, fatal
#log4perl.logger.Module2.Name=DEBUG, trace, debug, info, warn, error, fatal
### TRACE PACKAGES ####
#log4perl.logger.Module.Name=TRACE, trace, info
#log4perl.logger.Module2.Name=TRACE, trace, info
### DEBUG CATEGORIES ###
#log4perl.logger.function_name=DEBUG, debug
#log4perl.logger.Module.Name.function_name=DEBUG, debug
#log4perl.logger.Module.Name.function_name2=DEBUG, debug
log4perl.filter.trace = Log::Log4perl::Filter::LevelMatch
log4perl.filter.trace.LevelToMatch = TRACE
log4perl.filter.trace.AcceptOnMatch = true
log4perl.filter.debug = Log::Log4perl::Filter::LevelMatch
log4perl.filter.debug.LevelToMatch = DEBUG
log4perl.filter.debug.AcceptOnMatch = true
log4perl.filter.info = Log::Log4perl::Filter::LevelMatch
log4perl.filter.info.LevelToMatch = INFO
log4perl.filter.info.AcceptOnMatch = true
log4perl.filter.
warn
= Log::Log4perl::Filter::LevelMatch
log4perl.filter.
warn
.LevelToMatch = WARN
log4perl.filter.
warn
.AcceptOnMatch = true
log4perl.filter.error = Log::Log4perl::Filter::LevelMatch
log4perl.filter.error.LevelToMatch = ERROR
log4perl.filter.error.AcceptOnMatch = true
log4perl.filter.fatal = Log::Log4perl::Filter::LevelMatch
log4perl.filter.fatal.LevelToMatch = FATAL
log4perl.filter.fatal.AcceptOnMatch = true
log4perl.appender.trace=Log::Log4perl::Appender::Screen
log4perl.appender.debug=Log::Log4perl::Appender::Screen
log4perl.appender.info=Log::Log4perl::Appender::Screen
log4perl.appender.
warn
=Log::Log4perl::Appender::Screen
log4perl.appender.error=Log::Log4perl::Appender::Screen
log4perl.appender.fatal=Log::Log4perl::Appender::Screen
#log4perl.appender.error.color.ERROR=red
#log4perl.appender.fatal.color.FATAL=white on_red
#log4perl.appender.warn.color.WARN=yellow
#log4perl.appender.debug.color.DEBUG=white
#log4perl.appender.trace.color.TRACE=cyan
#log4perl.appender.info.color.INFO=green
#log4perl.appender.trace=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.debug=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.info=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.warn=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.error=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.fatal=Log::Log4perl::Appender::ScreenColoredLevels
log4perl.appender.trace.Filter = trace
log4perl.appender.debug.Filter = debug
log4perl.appender.info.Filter = info
log4perl.appender.
warn
.Filter =
warn
log4perl.appender.error.Filter = error
log4perl.appender.fatal.Filter = fatal
log4perl.appender.trace.layout=PatternLayout
log4perl.appender.debug.layout=PatternLayout
log4perl.appender.info.layout=PatternLayout
log4perl.appender.
warn
.layout=PatternLayout
log4perl.appender.error.layout=PatternLayout
log4perl.appender.fatal.layout=PatternLayout
log4j.PatternLayout.cspec.E =
sub
{
return
[
caller
(5)]->[1]; };
log4j.PatternLayout.cspec.e =
sub
{
return
[
caller
(5)]->[2]; };
#log4j.PatternLayout.cspec.D = sub { use Data::Dumper qw(Dumper); return Dumper($_[1]); };
log4j.PatternLayout.cspec.s =
sub
{
return
[
caller
(6)]->[1] .
': '
. [
caller
(6)]->[2]; };
log4perl.appender.trace.layout.ConversionPattern=[%-5p] %-80m
%c
:
%e
%n
log4perl.appender.debug.layout.ConversionPattern=[%-5p]
%c
:
%e
%n
%8m
%n
log4perl.appender.info.layout.ConversionPattern= [%-5p] %-80m
%c
:
%e
%n
#log4perl.appender.info.layout.ConversionPattern= [%-5p] %-80m %n
log4perl.appender.
warn
.layout.ConversionPattern= [%-5p] %-80m
log4perl.appender.error.layout.ConversionPattern=[%-5p]
%m
%n
log4perl.appender.fatal.layout.ConversionPattern=[%-5p] %-80m
share/log_config/test.cfg view on Meta::CPAN
1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283log4perl.rootLogger=TRACE, trace, debug, info,
warn
, error, fatal
#log4perl.logger.Module.Name=TRACE, trace, debug, info, warn, error, fatal
#log4perl.logger.Module2.Name=DEBUG, trace, debug, info, warn, error, fatal
### TRACE PACKAGES ####
#log4perl.logger.Module.Name=TRACE, trace, info
#log4perl.logger.Module2.Name=TRACE, trace, info
### DEBUG CATEGORIES ###
#log4perl.logger.function_name=DEBUG, debug
#log4perl.logger.Module.Name.function_name=DEBUG, debug
#log4perl.logger.Module.Name.function_name2=DEBUG, debug
log4perl.filter.trace = Log::Log4perl::Filter::LevelMatch
log4perl.filter.trace.LevelToMatch = TRACE
log4perl.filter.trace.AcceptOnMatch = true
log4perl.filter.debug = Log::Log4perl::Filter::LevelMatch
log4perl.filter.debug.LevelToMatch = DEBUG
log4perl.filter.debug.AcceptOnMatch = true
log4perl.filter.info = Log::Log4perl::Filter::LevelMatch
log4perl.filter.info.LevelToMatch = INFO
log4perl.filter.info.AcceptOnMatch = true
log4perl.filter.
warn
= Log::Log4perl::Filter::LevelMatch
log4perl.filter.
warn
.LevelToMatch = WARN
log4perl.filter.
warn
.AcceptOnMatch = true
log4perl.filter.error = Log::Log4perl::Filter::LevelMatch
log4perl.filter.error.LevelToMatch = ERROR
log4perl.filter.error.AcceptOnMatch = true
log4perl.filter.fatal = Log::Log4perl::Filter::LevelMatch
log4perl.filter.fatal.LevelToMatch = FATAL
log4perl.filter.fatal.AcceptOnMatch = true
log4perl.appender.trace=Log::Log4perl::Appender::Screen
log4perl.appender.debug=Log::Log4perl::Appender::Screen
log4perl.appender.info=Log::Log4perl::Appender::Screen
log4perl.appender.
warn
=Log::Log4perl::Appender::Screen
log4perl.appender.error=Log::Log4perl::Appender::Screen
log4perl.appender.fatal=Log::Log4perl::Appender::Screen
#log4perl.appender.error.color.ERROR=red
#log4perl.appender.fatal.color.FATAL=white on_red
#log4perl.appender.warn.color.WARN=yellow
#log4perl.appender.debug.color.DEBUG=white
#log4perl.appender.trace.color.TRACE=cyan
#log4perl.appender.info.color.INFO=green
#log4perl.appender.trace=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.debug=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.info=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.warn=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.error=Log::Log4perl::Appender::ScreenColoredLevels
#log4perl.appender.fatal=Log::Log4perl::Appender::ScreenColoredLevels
log4perl.appender.trace.Filter = trace
log4perl.appender.debug.Filter = debug
log4perl.appender.info.Filter = info
log4perl.appender.
warn
.Filter =
warn
log4perl.appender.error.Filter = error
log4perl.appender.fatal.Filter = fatal
log4perl.appender.trace.layout=PatternLayout
log4perl.appender.debug.layout=PatternLayout
log4perl.appender.info.layout=PatternLayout
log4perl.appender.
warn
.layout=PatternLayout
log4perl.appender.error.layout=PatternLayout
log4perl.appender.fatal.layout=PatternLayout
log4j.PatternLayout.cspec.E =
sub
{
return
[
caller
(5)]->[1]; };
log4j.PatternLayout.cspec.e =
sub
{
return
[
caller
(5)]->[2]; };
#log4j.PatternLayout.cspec.D = sub { use Data::Dumper qw(Dumper); return Dumper($_[1]); };
log4j.PatternLayout.cspec.s =
sub
{
return
[
caller
(6)]->[1] .
': '
. [
caller
(6)]->[2]; };
log4perl.appender.trace.layout.ConversionPattern=[%-5p] %-80m
%c
:
%e
%n
log4perl.appender.debug.layout.ConversionPattern=[%-5p]
%c
:
%e
%n
%8m
%n
log4perl.appender.info.layout.ConversionPattern= [%-5p] %-80m
%c
:
%e
%n
log4perl.appender.
warn
.layout.ConversionPattern= [%-5p] %-80m
%c
:
%e
%n
log4perl.appender.error.layout.ConversionPattern=[%-5p]
%m
%n
log4perl.appender.fatal.layout.ConversionPattern=[%-5p] %-80m
%c
:
%e
%n
( run in 0.434 second using v1.01-cache-2.11-cpan-d6f9594c0a5 )