dear all,
I have a question.
If I would like to parse all incoming mails from my qmail, which perl module is
easy to use?
my qmail emails incoming is /var/qmail/mailnames/<domain names>/support. In
this folder I already have preline in .qmail for piping emails to my perl
script.
And, my perl script what I already have is like this:
#!/usr/bin/perl -w
use Mail::Internet;
my $mail = Mail::Internet->new( [ <STDIN> ] );
my $headers = $mail->head->header_hashref;
my @subject = @{${$headers}{'Subject'}}; # or otherwsie do it in list context
it works
print @subject;
when I run it, I do not get anything.
please help.
regards,
Eko_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
