diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/src/exigrep.src | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/src/exigrep.src b/src/src/exigrep.src index e824bb41c..c6ccbfdc5 100644 --- a/src/src/exigrep.src +++ b/src/src/exigrep.src @@ -1,5 +1,5 @@ #! PERL_COMMAND -w -# $Cambridge: exim/src/src/exigrep.src,v 1.2 2004/12/21 11:28:38 ph10 Exp $ +# $Cambridge: exim/src/src/exigrep.src,v 1.3 2005/08/01 13:28:30 ph10 Exp $ use strict; @@ -58,6 +58,11 @@ return $seconds; my (%saved, %id_list, $pattern, $queue_time); sub do_line { + +# Convert syslog lines to mainlog format, as in eximstats. + +if (! /^\\d{4}/) { $_ =~ s/^.*? exim\b.*?: //; } + return unless my($date,$entry) = /^(\d{4}-\d\d-\d\d \d\d:\d\d:\d\d (?:[+-]\d{4} )?)(.*)/; |