use strict; use AppConfig; use Log::Log4perl qw(get_logger); my $config = AppConfig->new()->file("app.properties"); Log::Log4perl->init($config->get("log4perl")); # init log my $logger = get_logger(__PACKAGE__); # or some other name