package Emulate;
use Log::Log4perl;

my  $Logger = Log::Log4perl->get_logger(  __PACKAGE__ );

...

sub something_that_needs_to_log {
  $Logger->info('Foo');
}