Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

Re: Call Perl via email

by gnosti (Friar)
on Aug 04, 2011 at 08:07 UTC ( #918460=note: print w/ replies, xml ) Need Help??

in reply to Call Perl via email

Here is a way to do it without procmail using Email::Filter and a sendmail interface such as Email::Sender.

In ~/.forward

| filter_mail

In ~/bin/filter_mail

use Email::Filter; my $mail = Email::Filter->new(emergency => "~/emergency_mbox"); $mail->accept("$ENV{HOME}/Mail/new") unless $mail->subject =~ /magic_k +eyword/; # usually exit here send_mail(); sub send_mail { # see docs for Email::Sender }

Comment on Re: Call Perl via email
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://918460]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (2)
As of 2015-11-28 05:34 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (738 votes), past polls