On Thu, 29 Aug 2002, Oren Gozlan wrote:
Hi,
I have this procmailrc that i want him to send all incomming e-mail to
the Perl script and and dump the orig mail to /dev/null.
i think i make it right ... but it is not working ...
Help ... ???
###############
My procmailrc
###############
:0 f
| /root/"MyPerl"
Add the following lines before your script:
VERBOSE=yes
LOGABSTRACT=all
SHELL=/bin/sh
Run procmail from command line:
procmail /the/test/procmailrc < /a/test/message
What does the log say?
#################
My Perl :
#################
#!/usr/bin/perl -w
Did you check the script? Does it work?
use strict;
use LWP::UserAgent;
use URI::URL;
use Net::SMTP;
use MIME::Parser;
use MIME::Entity;
use Carp;
my $smtp;
$smtp = Net::SMTP->new('localhost');
Do you send the message to localhost where your procmail
is waiting with the mentioned recipe?
Bye,
Udi
_______________________________________________
procmail mailing list
procmail(_at_)lists(_dot_)RWTH-Aachen(_dot_)DE
http://MailMan.RWTH-Aachen.DE/mailman/listinfo/procmail