Mail::Sender worked great for me. I don't know how minimal the module is, but usage is very simple, as below
use Mail::Sender;
...
my $sender = new Mail::Sender {smtp => $smtpServerName, from => $emai
+lFromAddress};
my $result = $sender->MailFile({
to => [@emailToList],
cc => [@emailCCList],
subject => "Stats (Day $day of $month/$year)" . ($errors?" - Parti
+al results":''),
msg => "Stats for day $day of $month/$year are attached." . ($erro
+rs ? "\n\nErrors encountered:\n$errors\n" : ''),
file => $filename,
});
|