in reply to Bareword warning question
Hello Akoya,
I have just a little suggestion for this code part:
I have just a little suggestion for this code part:
Maybe you like to use something likeprint $LOG _timestamp(), q{ }, join ':', $0, $msg_level, $msg;
Kind regards, bloonixuse Log::Handler; my $log = Log::Handler->new( filename => $logfile, mode => 'append', timestamp => $your_format, prefix => "$0:<--LEVEL-->:" ); $log->warning($msg); # or another msg_level
In Section
Seekers of Perl Wisdom