This patch makes Pflogsumm working with the particular format of the OSSP fsl based Postfix logfile. --- pflogsumm.pl.orig Tue Jun 17 17:59:57 2003 +++ pflogsumm.pl Tue Jun 24 11:41:59 2003 @@ -498,8 +498,8 @@ s/: \[ID \d+\s+[^\]]+\] /: /o; # lose "[ID nnnnnn some.thing]" stuff my $logRmdr; ($msgMonStr, $msgDay, $msgTimeStr, $logRmdr) = /^(...)\s+(\d+)\s(..:..:..)\s\S+\s(.+)$/o; - unless((($cmd, $qid) = $logRmdr =~ m#^(?:vmailer|postfix|$syslogName)/([^\[:]*).*?: ([^:\s]+)#o) == 2 || - (($cmd, $qid) = $logRmdr =~ m#^((?:vmailer|postfix)(?:-script)?)(?:\[\d+\])?: ([^:\s]+)#o) == 2) + unless((($cmd, $qid) = $logRmdr =~ m#^<[a-z]+>\s+(?:vmailer|postfix|$syslogName)/([^\[:]*).*?: ([^:\s]+)#o) == 2 || + (($cmd, $qid) = $logRmdr =~ m#^<[a-z]+>\s+((?:vmailer|postfix)(?:-script)?)(?:\[\d+\])?: ([^:\s]+)#o) == 2) { #print UNPROCD "$_"; next; @@ -1324,7 +1324,7 @@ } my ($t_mday, $t_mon) = (localtime($time))[3,4]; - return sprintf("%s %2d", $monthNames[$t_mon], $t_mday); + return sprintf("%s %02d", $monthNames[$t_mon], $t_mday); } # if there's a real domain: uses that. Otherwise uses the first