Help for this page

Select Code to Download


  1. or download this
    print $LOG _timestamp(), q{  }, join ':', $0, $msg_level, $msg;
  2. or download this
    use Log::Handler;
my $log = Log::Handler->new(
...
);

$log->warning($msg); # or another msg_level