On 17-Jul-2007, at 21:56, Mar Matthias Darin wrote:
---
:0
*^Received:.from.*\(\/[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+
\).*by.schatten.darksystem.net ..qpsmtpd
* MATCH ?? ^^\/[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+
{ SENDERIP = $MATCH }
---
Hmm... there's a better way, as I recall
Something like this:
OCTET = ([01[?[0-9]?[0-9]|2[0-4][0-9]|25[05])
QUAD = $OCTET[.]$OCTET[.]$OCTET[.]$OCTET
:0
* $ ^Received:$WS+from$WS+\(\/$QUAD\)
* $ MATCH ?? ^^$QUAD
{ SENDERIP = $MATCH }
--
Rumour is information distilled so finely that it can filter through
anything. It does not need doors and windows -- sometimes it does not
need people. It can exist free and wild, running from ear to ear
without ever touching lips.
____________________________________________________________
procmail mailing list Procmail homepage: http://www.procmail.org/
procmail(_at_)lists(_dot_)RWTH-Aachen(_dot_)DE
http://MailMan.RWTH-Aachen.DE/mailman/listinfo/procmail