adding extra debug
This commit is contained in:
parent
5180f6dcbc
commit
4d92314b7e
|
@ -77,8 +77,8 @@ while (my $line = <>) {
|
|||
my ($stream, $version, $timestamp, $subsystem, $event, $sid, $token, $data) = split /\|/, $line;
|
||||
if ($line =~ m/data-line/) {
|
||||
if (!$data) { $data = ""; }
|
||||
if ($data =~ m/^precedence:\s+(bulk|list|junk)/i) { $ooo{$sid} = 0; }
|
||||
if ($data =~ m/^list-(help|id|owner|post|subscribe|unsubscribe):.*/i) { $ooo{$sid} = 0; }
|
||||
if ($data =~ m/^precedence:\s+(bulk|list|junk)/i) { $ooo{$sid} = 0; print "Virtual Vacation: header found $data\n" if ($opt_d); }
|
||||
if ($data =~ m/^list-(help|id|owner|post|subscribe|unsubscribe):.*/i) { $ooo{$sid} = 0; print "Virtual Vacation: header found $data\n" if ($opt_d); }
|
||||
if ($data =~ m/^x-loop:\s+opensmtpd\ admin\ virtual\ vacation/i) { $ooo{$sid} = 0; }
|
||||
print STDOUT "filter-dataline|$sid|$token|$data\n";
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue