informacie z logu postfixu

[Dalibor Straka]

On Thu, Aug 28, 2008 at 02:57:23PM +0200, Kilian Igor wrote:
> To je sice pekne (ako som uz pisal pouzivam ho) ale ani prepinac -e mi
> nenapise datum a cas ku kazdemu IDcku mailu, takze neziskam casovy udaj
> kedy mail bol poslany. To je pre mna v tomto pripade velky problem.
> Proste ten datum a cas potrebujem. Inak dik za radu.
> 
Ahoj,

mam nejaky obstarozni pflogsumm.pl, ale patch je v zasade citelny.

-- Dalibor Straka

--- /usr/local/bin/pflogsumm.pl	2008-08-29 12:03:02.000000000 +0200
+++ pflogsumm.pl	2008-08-29 12:02:54.000000000 +0200
@@ -699,7 +699,7 @@
 		$addr = "from=<>"
 	    }
 	    $msgSizes{$qid} = $size;
-	    push(@{$msgDetail{$qid}}, $addr) if($opts{'e'});
+	    push(@{$msgDetail{$qid}}, "$msgDay.$msgMon.$msgYr $msgHr:$msgMin:$msgSec, $addr") if($opts{'e'});
 	    # Avoid counting forwards
 	    if($rcvdMsg{$qid}) {
 		# Get the domain out of the sender's address.  If there is
@@ -757,11 +757,11 @@
 		    ${$recipDom{$domAddr}}[$msgSizeI] += 0;
 		    ${$recipUser{$addr}}[$msgSizeI] += 0;
 		    $noMsgSize{$qid} = $addr unless($opts{'noNoMsgSize'});
-		    push(@{$msgDetail{$qid}}, "(sender not in log)") if($opts{'e'});
+		    push(@{$msgDetail{$qid}}, "$msgDay.$msgMon.$msgYr $msgHr:$msgMin:$msgSec (sender not in log)") if($opts{'e'});
 		    # put this back later? mebbe with -v?
 		    # msg_warn("no message size for qid: $qid");
 		}
-		push(@{$msgDetail{$qid}}, $addr) if($opts{'e'});
+		push(@{$msgDetail{$qid}}, "$msgDay.$msgMon.$msgYr $msgHr:$msgMin:$msgSec, $addr") if($opts{'e'});
 	    } elsif($status eq 'deferred') {
 		unless($opts{'noDeferralDetail'}) {
 		    my ($deferredReas) = $logRmdr =~ /, status=deferred \(([^\)]+)/o;