use Log::Log4perl;
use constant AUTH_TIMEOUT => 5 * 60;
-use constant ACCESSLOG_FORMAT => 'combined';
sub CONTENT_SECURITY_POLICY () {
my $csp = <<CSP;
}
Log::Log4perl->init_once('log.conf');
-my $access_logger = Log::Log4perl->get_logger('access');
$ENV{DBIC_NULLABLE_KEY_NOWARN} = 1;
builder {
enable_if { $_[0]->{PATH_INFO} eq '/ok' } sub { sub{ [200, [], []] }};
- enable 'AccessLog', format => ACCESSLOG_FORMAT, logger => sub { $access_logger->info(@_) };
enable 'ContentLength';
enable \&add_headers;
enable 'Static', path => qr,^/static/,;
log4perl.category. = TRACE,
-log4perl.category.access = INFO, accesslog
log4perl.appender.stderr = Log::Log4perl::Appender::Screen
log4perl.appender.stderr.layout = Log::Log4perl::Layout::PatternLayout
log4perl.appender.stderr.layout.ConversionPattern = [%d] [%F{1}:%M{1}:%L] [%p] %m%n
-
-log4perl.appender.accesslog = Log::Log4perl::Appender::Screen
-log4perl.appender.accesslog.layout = Log::Log4perl::Layout::PatternLayout
-log4perl.appender.accesslog.layout.ConversionPattern = %m%n