- or download this
use Log::Log4perl qw(:levels);
my $logger = Log::Log4perl->get_logger(__PACKAGE__);
$logger->level($DEBUG);
- or download this
use Mylog;
#...
$LOG->warn("bla"); # $LOG is presumably a package global
- or download this
use MyLog 'debug';
$LOG->warn("stuff");