# Requirements - the following perl modules are required:
# DBD::Pg or DBD::mysql
# Mail::Sender, Email::Valid MIME::Charset, Log::Log4perl, Log::Dispatch, MIME::EncWords and GetOpt::Std
# EMail::Sender, Email::Valid MIME::Charset, Log::Log4perl, Log::Dispatch, MIME::EncWords and GetOpt::Std
#
# You may install these via CPAN, or through your package tool.
# CPAN: 'perl -MCPAN -e shell', then 'install Module::Whatever'
@ -131,10 +131,14 @@ use Encode qw(encode decode);
useMIME::EncWordsqw(:all);
useEmail::Valid;
usestrict;
useMail::Sender;
useGetopt::Std;
useLog::Log4perlqw(get_logger :levels);
useFile::Basename;
useEmail::Sender::Simpleqw(sendmail);
useEmail::Sender::Transport::SMTPS;
useEmail::Simple;
useEmail::Simple::Creator;
useTry::Tiny;
# ========== begin configuration ==========
@ -164,11 +168,22 @@ our $smtp_server_port = 25;
# depending upon what smtp helo restrictions you have in place within Postfix.
our$smtp_client='localhost';
# SMTP authentication protocol used for sending.
# Can be 'PLAIN', 'LOGIN', 'CRAM-MD5' or 'NTLM'
# see "perldoc Mail::Sender" (search for "auth") for more options and details
# SMTP encryption protocol used for sending.
# Can be '', 'starttls' or 'ssl'
# see "perldoc Email::Sender" (search for "ssl") for details
# Leave it blank if you don't use authentication
our$smtp_auth=undef;
our$smtp_ssl='';
# Options passed to Net::SMTPS constructor for 'ssl' connections or to starttls for 'starttls' connections; should contain extra options for IO::Socket::SSL
# see "perldoc Email::Sender" (search for "ssl_options") for details
our$smtp_ssl_options='';
# Maximum time in secs to wait for server; default is 120
# see "perldoc Email::Sender" (search for "timeout") for details