[Mimedefang] mimedefang subject filtering code
David F. Skoll
dfs at roaringpenguin.com
Wed Feb 18 08:23:23 EST 2004
On Wed, 18 Feb 2004, Andrew Jayes wrote:
> my($msgSubject);
> my($hfile) = "HEADERS";
> while(<HEADERS>) {
No, no, no! You aren't opening the file; Perl won't have a clue what you're
trying to do.
Also, the message subject is available in the global variable $Subject
without your having to do any magic. So just use this:
if ($Subject =~ /\bparis hilton\b/i) {
# whatever....
}
--
David.
More information about the MIMEDefang
mailing list