sub simple_sendmail ($$) {
my ($subject, $message) = @_;
my $sendmail = '/usr/sbin/sendmail';
my $from = "from_email\@from_domain.com";
my $to = "to_email\@to_domain.com";
open(MAIL, "|$sendmail -oi -t");
print MAIL "From: $from\n";
print MAIL "To: $to\n";
print MAIL "Subject: $subject\n\n";
print MAIL "$message\n";
close(MAIL);
}
define sm notify sm {simple_sendmail("fhem message","simple foobar")}