Select Code to Download

use Email::Filter;
my $mail = Email::Filter->new(emergency => "~/emergency_mbox");
...
# see docs for Email::Sender

}