eleksir/aleesa-telegram-bot
1
Fork 0
Code Activity

Add date to logger() messages like in bsd syslog

Browse Source
This commit is contained in:
eleksir
2020-09-21 02:11:47 +03:00
parent 1822054f03
commit f0d8e90441
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/botlib.pm
View File

@@ -192,11 +192,15 @@ sub logger {
my $msg = shift;
if ($c->{debug_log}) {
my @date = localtime();
my @month = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
my $t = sprintf ("%02s %02d %02d:%02d:%02d ", $month[$date[4]], $date[3], $date[2], $date[1], $date[0]);
my $mode = '>';
$mode = '>>' if (-f $c->{debug_log});
if (open (LOG, $mode, $c->{debug_log})) {
print LOG $msg . "\n";
print LOG $t . $msg . "\n";
close LOG;
}
}