#!/usr/bin/perl
use strict;

package MyModule;
use Log::Log4perl;
my $log = Log::Log4perl->get_logger("MyModule");

sub doit {
  $log->info("I'm doing it !");
}

package main;
use Log::Log4perl ':easy';
Log::Log4perl->easy_init();

$log->info("Asking doit");
MyModule->doit();