use Log::Log4perl (get_logger);
my $logger = get_logger();
sub sayHello
{
  $logger->info("Hello world!");
}