package MyApp; use strict; use warnings; use Log::Handler myapp => 'LOG'; sub foo { LOG->info('message from foo'); } sub bar { my $log = Log::Handler->get_logger('myapp'); $log->info('message from bar'); } 1;
package MyApp; use strict; use warnings; use Log::Handler myapp => 'LOG'; sub foo { LOG->info('message from foo'); } sub bar { my $log = Log::Handler->get_logger('myapp'); $log->info('message from bar'); } 1;