From: Moritz Bunkus Date: Mon, 16 Jun 2014 07:42:11 +0000 (+0200) Subject: LXDebug: Zeitstempel mit Millisekunden-Auflösung ausgeben X-Git-Tag: release-3.2.0beta~411^2~61 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=278523a45d785ee37a915067b73ffe098b5df88d;p=kivitendo-erp.git LXDebug: Zeitstempel mit Millisekunden-Auflösung ausgeben --- diff --git a/SL/LXDebug.pm b/SL/LXDebug.pm index 80b41f95a..016015f52 100644 --- a/SL/LXDebug.pm +++ b/SL/LXDebug.pm @@ -260,7 +260,8 @@ sub is_tracing_enabled { sub _write { no warnings; my ($self, $prefix, $message) = @_; - my $date = strftime("%Y-%m-%d %H:%M:%S $$ [" . getppid() . "] ${prefix}: ", localtime(time())); + my @now = gettimeofday(); + my $date = strftime("%Y-%m-%d %H:%M:%S." . sprintf('%03d', int($now[1] / 1000)) . " $$ [" . getppid() . "] ${prefix}: ", localtime($now[0])); local *FILE; chomp($message);