Both scripts mostly work, they do what they're intendend to do except from sending emails calling mutt. This works fine on our old setup, not in the new one.
This is the code we use to send mails
Code: Select all
sub send_mail
{
my($to,$subject,$str) = @_;
open(MAIL, "| /usr/bin/mutt -xs '$subject' -b alertasvpn\@company.com '$to'" );
print MAIL "$str\n";
close(MAIL);
}