| author | heiko | 
| Thu, 13 Apr 2006 10:20:50 +0000 | |
| changeset 16 | 1a5dfa10610c | 
| parent 15 | 9a4e01051148 | 
| child 17 | 9876af693873 | 
--- a/exiacl.pl Thu Mar 09 08:18:04 2006 +0000 +++ b/exiacl.pl Thu Apr 13 10:20:50 2006 +0000 @@ -87,7 +87,7 @@ $Cf->From($Cf->from) unless $Cf->From; $Cf->To($Cf->to) unless $Cf->To; - $Cf->Helo((split/@/, $Cf->from||"")[1] || HOSTNAME) + $Cf->Helo(map { s/[<>]//g; $_ } (split/@/, $Cf->from||"")[1] || HOSTNAME) unless $Cf->Helo; $Cf->dst(addr(HOSTNAME)) unless $Cf->dst;