use Log::Log4perl qw(get_logger);
Log::Log4perl->init('logger.conf');
$exitcode = 1;

my $logger = get_logger();
if ($exitcode == 1){
  $logger->info("Something went right");
}