[Mimedefang] received headers ofuscation
Steffen Kaiser
skmimedefang at smail.inf.fh-bonn-rhein-sieg.de
Wed Nov 25 03:06:01 EST 2009
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
On Tue, 24 Nov 2009, ulver wrote:
> thanks guys!!, following your advices (and googling a lot) i achieve these piece of code (on filter_end)
>
> $header_object = $entity->head;
>
> i got an ...nice Slave 0 stderr: Can't use an undefined value as a SCALAR reference at.....
Where is the "at ..." ?
Anyway, I would start looking into something like this:
if(open(H, '<', 'HEADERS')) {
action_delete_all_headers('received');
while(<H>) {
next unless s/\Areceived:\s//i;
chop;
# Mess around with $_
action_add_header('Received', $_);
}
unless(close H) {
send_short_message_to_admin("Hey admin, something is wrong here: $!");
return action_tempfail('internal server error');
}
}
Bye,
- --
Steffen Kaiser
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)
iQEVAwUBSwzlbtlJzF6z/k3SAQLuWQgAhOQaakkaopt7Hq05vFUgo8IAb+ua1m0O
CNNdr7CsXDd9JUFIkGbVQD65HpN24JgQXmKbVCPm0IusOlpkeGfCtWKer3MPIk/7
7ZfO9Ldyoxujz2eCODj1FggsTP6rUCc/Vuvb7NmTt2G1huLzF0qUISobMhiwZbxZ
6bpdgKOsZ24E4R3Xf98Iv4jdGWZeNYCzxgvSUlyIQUsQYvHIzNwODrghHpK5vyQ5
j9nBs1Go7kj+ysPqAYHKfC0sj50Po8TGtRWsXBacnuz3pWQHt7LpVpCdXqu7jVAD
HU0cS8H8fbCpqExcLTY0x/77VPOoHcVV9a7blnbdnNbeg1TjLjigjw==
=XPWF
-----END PGP SIGNATURE-----
More information about the MIMEDefang
mailing list